icati 


An EMAP Publ 


ig a LANDS OF HAVOC A 2,000 plus screen 


Arcade Adventure described as the first MEGA GAME for the 
Q.L. Include 9 full colour maps . . . the book of change 


RS 3i8o%8. excellent graphics and sound. The arcade style of this game 
me a makes it playable by young 
maid 


mid Rs UN PACHA CEN D children and adults alike. 
auger pegsas ze 2 £19.95 


CRAZY PAI NTER Incredibly addictive and 


totally original arcade game. 8 levels of difficulty, hi-res 
graphics and superb music. Try to paint the floor of a really 
busy house but chase off unwanted Dogs, Snakes and Bugs - 
avoid the tins and bubbles of turps and stop the paint running 


on a unique challenge screen. £1 2 95 


Mi : = 
CRODRIVE CARTR)D : 


MICROD FE. AL OR oy 


Katya Cisse 
a 


HIGH SCORE 


SS CUTHBERT IN SPACE &:«: ovine 


“jet-pac” type arcade game. Play the part of CUTHBERT 
looting the moronians planet. A real Zap arcade game witha 
strategic breakdown feature. 


£14.95 


H O PPE R A giant leap forward for the Q.L. and 


guaranteed to keep you ‘ribbetted’ to your seats “FROGGER” 


type arcade game with extra £1 4 95 


lanes of cars and crocodiles! 


Q.L. FLIGHT Flight simulator with 9 different 


scenarios. Take off - land - refuel a light aircraft. You can 
perform aerobatics and fly from scenario to scenario. Avoid 
Power lines - Mountains and watch your fuel!!! in this realistic 


simulation. Wire line graphics. 
Release date November 1985. £1 9.95 
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OOPS! 


PLEASE NOTE: October’s 
article on program protection 
should be amended. 

Listing 5: 

435 IF rom_ver$(1 TO 2) 
=‘JS’ THEN LET 

rom_recog=1 

520 LET mdv_one_ 
number=PEEK_W 
(reserved_address 
+142) 

560 LET mdv_two_ 
number=PEEK_W 
(reserved_address 
+142) 

Also three lines were 
omitted from the Spectrum-via 
RS282 listing. Just add: 

10 CLEAR#:20 

FORMAT “‘b’’;9600:30 
OPEN#4,“‘b”’ 


QL Caverns 2™ 


Solve the BJ mystery and win a 
Floppy Disk System + ICE full 


, details within 


~~ 2 Sore act JD runx has died leaving BJ 
Ce ae See . ; helpless in the caverns. Good 
| re = : . Heavens Abovel!! Matilda the 
magic fairy has agreed to let 
BJ go providing he collects all 
the miracles from the caverns. 
A formidable task awaits you 
as you join BJ in this mega 
sequel to QL Caverns™ 


£12.95 


Joysticks for Super Smooth Action. 

Suit all games and ICE. 

Sureshot QL £49.95. the ultimate in Control. 
Quickshot QL £412.95. standard. 

AL Convert Lead for ATARI Joysticks £5.49 


* £1 Discount if purchased with program 


QL Caverns is a trade mark of Sinclair Research Ltd 


ty ie | NOW WITH EAGLE 
ix. ee 7 


enesenrs 


Now available at good computer shops! 


GF sricn & 


HIGHTY HUNCHERS 


1 ee2e2e 
eee0sc0 


Two great machine code Ql games for 
the price of one! Zapper the snappy 
arcade game is now joined by 
“Defender” style eagle. 


Amazing Value 


£10.95 


PRR RE RRR BR RRR Ree eee 
i Eidersoft, The Office, Hall Farm, North Ockendon, Upminster, 


doors, swing doors and 
much more! Joystick/ 


cursor/sound. 642.95 


CREDIT CARDS 
TEL: 0708 852647/851099 | 


0 Tick if you require disk drive information. 


WEMElGSE CHEHSE SPO TOME. cna rcanneccuhousat anu tony tetera uamemniadnn Stiiiie 
*EUROPOST £2.00 WORLD £3.00 


i Please deduct my Access/Visa/American Express 


EB Essex RM14 3QH. 
ry Please supply the following items:— 
O BJ THE RETURN @ £12.95 @dCh ws + £1.00 P&P* 
BO SPOOK@ $12.95 CGCH vec, + £1.00 P&P* 
| ll -ZAPPERIEAGLE @*S410i9S nc s.siesvsasnsvnn vain + £1.00 P&P* 
ge QUICKSHOT JOYSTICK @ £12.95 each ..... + $1.50 P&P* 
O SURESHOT JOYSTICK @ £19.95 each........ + $4.50 P&P* 
| ' BO QLCONVERT LEAD @ £5.49 €ACh oo. ee + $1,00 P&P* 
This is one of the bes i eS ee . - ee 
muncher games we have BM acid 
fa BSS cristo vx snnus dss axascreeehe locke pe serronnrre ern elle oenusid lacinecisasd ntueate rise Stare neo clare ARENT Mirae eT ena I 
seen ona micro! Full DN a een 5 A 
features include multiple rt ee ot ee a Oe 
screens, fruits, sliding - ee as ant a ee 
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[Glad Tidings si [Glad Tidings si 


Christmas will doubtless be a 
time of rejoicing for the few 
games software houses that 
gambled on the QL. 
September’s price cut has sent 
sales of machine through the 
ceiling and catches the big 
names in the industry on the 
hop. 

Despite frantic efforts from 
the likes of Firebird and Ocean 
it looks as if none of the 
established (8-bit) software 
houses will make it into the 
market until the new year. 
Far too late to grab a slice of 
the action as games-starved 
users go to town on their 
annual Yuletide spree. 

However, even if there won’t 
be any newcomers Xmas still 
holds a few surprises. To begin 


with Psion are set to release a 
new graphics package called 
QDRAW. This began life as an 
in-house programmer’s aid 
and was used to design the 
sprites for their award 
winning 3D Chess game. 
Then there’s Eidersoft with 
two new entries to their credit 
— Ghost and BJ the Return. 
The former isa fairly standard 
Pacman type game. The latter 
is the sequel to QL Cavern and 
has its hero transmogrified 
into an aeroplane and ona 
suicide mission for the fairies. 
Eidersoft say the game uses 
very much more complex 
graphics and is twice as fast as 
its popular predecessor and 
has a spectacular ending. It is 
also very much harder to play. 
Indeed, they are offering £500 
in computer equipment to the 


“A MegaBasic extension to the QL from CST. All that’s required 


now is the networking software’’. (See below.) 


BY SILHOUETTE 


Conceived by conjecture, 
designed by journalists and 
built by nobody, the new 
Sinclair ‘Enigma’ qualifies as 
the non-event of the month. 
Any QL peripherals’ 
manufacturer can tell you that 
mice are fashionable, disk 
drives are reliable and extra 
memory is desirable. All three 
are available for the QL right 
now! So why fabricate a new 
machine? 


Certainly, enough is 
happening on the QL scene to 
make any speculation about a 
QL mark II seem trivial. To 
begin with CST have now 
brought out a 40Mb 
Winchester disk system for 
the QL. The device includes 
two built-in floppy drives for 
backing-up and costs £3670. 
With a storage capacity 
equivalent to some 400 
microdrives the system offers 
the ideal solution for those 
with six figure household 
accounts to contend with. 

On a less esoteric level, the 
battle for the definitive 
expansion system continues 
unabated with prices 
plummeting all the while. 


first person to complete it. 

From Sinclair we can look 
forward to Pawn, a humorous 
full-length text adventure 
with a little bit of AI thrown 
in. Also due for release are two 
more arcade games from the 
authors of Meteor Storm. JAB, 
short for Journey Around the 
Body casts you in the role of an 
antibiotic purging the body of 
deadly viruses and bacteria. 
Star Fight on the other hand is 
the QL’s answer to Atari’s Star ° 
Raiders. 

Finally from Compugem, 
masters of the apocalyptic 
shoot-em-up extravaganza we 
can expect Destructor, a 
superfast and exceedingly 
difficult variation upon the 
arcade classic Defender and 
aimed at being a cut above 
Sinclair’s Meteor Storm. 


It comes as something of a 
surprise to discover that a 
small German company is the 
first on the QL scene witha 
fully working mouse. 
Apparently ABC Elektronic of 
Bielefeld developed their 
mouse to complement their 
new Giga-Basic ‘Toolkit’. 

Giga-Basic adds over 70 new 
commands to SuperBasic in 
fields as diverse as Sprite 
Animation, Random Access, 
Multitasking, Icon Definition 
and creating your own mouse 
driven pull-down menus. 

AB will also be releasing a 
zap-em-up game with the 
somewhat unassuming title of 
‘Fight’ (see the review inside 
this issue). 


Interfaces have become ever 
more sophisticated. Sinclair’s 
own badged product looks 
obsolete when compared with 
those offering RAM disk 
drivers, parallel printer ports, 
integral toolkits and even 
GEM or UNIX like front ends 
for QDOS. 

As for the floppy drives 
themselves, it seems that 
nothing less than 1 megabyte 
(unformatted) will do. This is 
just as well as lower capacities 
are no longer cost effective. 
Furthermore, it looks as 
though the new compact 3.5” 
drives have won out against 
their better established and 
reputably more reliable 5.25” 
cousins. All we can look 
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One Man Band 


Are computer “whizz” kids 
merely a fabrication designed 
to-sell home computers to 
aspiring mothers? If teenager 
Janko Mrsic-Flogel is 
anything to go by, we think 
not. At 17 and studying for his 
‘A’ levels, this young 
hungarian has authored more 
than half the best selling 
games on the QL. In under a 
year he has clocked up such 
titles as M-Cosmic, M- 
Treasure, M-Cruncher, 
M-Metropolis, QL Cavern and 
BJ the Return. 

Janko, however, is not justa 
prodigious programmer but 
he is also a budding 
entrepreneur with his own 
company Paradox Software. 
Already contracted to write 
68000 games for arcade 
machines, the company will be 
launching no less than six 
‘megagames’ for the QL in the 
coming year. 

When asked whether he 
would work on any other 
68000 computers Janko 
expressed considerable 
interest in the Amiga but said 
of the Atari ST series “It’s just 
old technology presented in a 
flash box. Not worth the 
effort.” He should know! 


forward to now are the latest 
Japanese third-height 
‘slimline’ dual drives. With 
these it is the QL that dwarfs 
the drives and not the opposite. 

If you are looking for a few 
stocking-fillers for Xmas the 
QL market has them in 
abundance. As a result of the 
overwhelming demand 
Transform Ltd are now 
producing ready made 
QL-to-Spectrum leads. 

Spike Suppressors which 
prevent the QL from freezing 
up when there is asurge in the 
mains supply are available 
from Tony Firschman Services 
Ltd. Other goodies include 
flip-top dustcovers, numeric 
keypads, joysticks and mice. 
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MITK 


-leaders1n QL expansi 
-introduceWincheste 


The MEDIC Winchester hard disk 


Nine performance-raising programs, free with 
every MEDIC disk drive system. 
(Extra memory recommended.) 


M-DESK 


SPECIAL MEDIC OFFER 
£449.95 


Includes MEDIC systemcartridge with 512K extra memory 
plus disk interface and parallel port, built-in 720K floppy 
eee oe re eee . disk drive plus separate SMB Winchester hard disk 

igen eee ran lia ie ah Pe ti including cables and power supply + full suite of MEDIC 
selection M-BASE turns Archive into a menu-driven FREE BUSINESS SOFTWARE. 


database with single-key commands M-ACCOUNTS 
fully integrated sales, purchase, nominal ledgers, and 
stock control M-KEY single-key entry of user-defined 
textin any program M-SPELL spelling checker 


M-SPELL M-MERGE 


M-MERGE personalised mailshots M-SQUEEZE file ee A I ET PE eR IT IE ES ED PUT INE IY SI ARR 
compression M-BOOT sets up RAM disks in memory i 

then automatically loads pre-defined files and programs Hackwood Lane, Cliddesden, 
M-TRANSFER microdrive — disk routine. Hants RG25 2NH. 


Telephone 0256 460 692. 


on systems 


hard disk technology. 


To order, please tick the items you require and enter total 
order value — to include £10 p&p (£2.95 for orders under 
£125) in the box below. All prices shown include VAT. 


All orders must be signed. Please allow 28 days for delivery. 


Extra memory 
MEDIC systemcartridge with extra 512K memory inc. 
power supply 


Dust Cover plus 3 adjustable feet 

Joystick 

Disk pack Ten 31In disks in rigid plastic storage box 
Modem* 

Add to disk interface or complete system price (not sold 
separately since connects through systemcartridge) £120.00 a 
*not shipped until BT approved 

Complete system MEDIC systemcartridge with built*in disk 

drive (1MB, 720K formatted), inc. disk interface, power supply + 
FREE SOFTWARE £199.95 L] 
Complete system + Winchester MEDIC systemcartridge inc. 512K 
extra memory plus disk interface, parallel port with built-in 720K 


disk drive, plus 5MB Winchester hard disk inc. cables and 
power supply + FREE SOFTWARE £449.95 ia 


£149.95 L] 
£14.95 L] 

£9.95 LI 
£39.95 L] 


Send now for your free 
monitor voucher, entitling you 
toa free high-resolution 
green- screen monitor with 
anti-glare screen when you 
order anew MEDIC disk drive 
system (minimum price 
£249.95) at any time up 
to May 1986. 


= Monitor 


High-resolution 9-inch with green anti-glare screen 
Winchester hard disk 5MB formatted, inc. interface 


Professional QL keyboard Full travel keys, owner- 
installed, needs only a screwdriver ‘ 


Numeric keypad Needs interface, see below 
Mouse Includes M-Paint graphics program, needs 
interface, see below 

Interface For numeric keypad and mouse (only one 
needed to connect both items via ROM port) 
Printer Cable QL parallel printer cable 

L] Please send me my free monitor voucher 


*you do not need to order items. But all name and address details must be 
completed (No signature necessary). 


£89.95 L] 
£299.95 L] 


£29.95 L] 
£29.95 L] 


£49.95 L] 


£14.95 L] 


£14.95L_] 


Please send me the items | have ticked on this order form and 


| agree to pay cash on delivery* | am over 18. 


*COD offer for UK addresses only. Overseas purchasers must send 


cash (sterling) with order. 


Total order value (inc p&p) [ 


Signature 
NAME 
ADDRESS 


TELEPHONE (Area code)___(No.) 


All sections must be completed, PLEASE USE BLOCK CAPITALS. 


The complete, unabridged 


and unexpurgated works of 


the QL games writing 


f3Caceaces 


24 = @ 


form of computer — 
entertainment, and this 
L gives you exactly that. T) 
lopper is a game lacking in different attack waves are _ 
the imiportant squelch as merely variations on diagonal : 
/feehanical drivers flatten yet lines—aren’t aliens stupid — 
other fro , hopping, but they certainly keep you 
Ad j jumping across _ lone space ship bus, : 
. pression of = M1 There 
\durin Vi rush how 
; thik why the frogs 
Acros 
/placé;maybe eh hops © 
_€ Jor something. Even when 


k through the ‘destruction 

“derby, there’s still {héxiver, 

Though not perfectly\ amongst% 
rippleless, the graphics >.) only one ght 
fairly colourful. Hopper? / 
controlis quite sensitive bra 
he certainly looks smtig once _ to find timé toveriticise 
he'reaches his riyen ‘bank lair. mediocres prite cape c 

On any other micr6, this I’m sure ‘ihcohe 
version of Frogger, Would keep bashing me o a thebac o 
probably flop, but as the QL of the inter} eller ‘ive, hav 
games market goes,he might it in for m 
not sink too far below th 
surface. Fast tho 
traffic may get,/ A can’t belié 
they’re rushing to the ‘Bons to. 
buy the game. 


= Vers : ‘ 
Crazy Painter ma Ne game 
F earthlings h 
paral ead is 
alie 
strengt 
micro 


/Decorating was never this 
muchhassle (Have you done 
any lately Marcus — Ed?!) In 
crazy painter, you take the 

§ rolé of an animated paint 
brush\beleaguered in your 
ework of trying to paint the 
screen by ah assortment of 
irritating individuals. 
Inmates from Battersea’dogs 


Ciicinal@pace Invader gam. I 


home trek dirty paws, 1 ' 
workmen take tea breaks, “Shaws as nich ell the 


snakes slither trails, and even boonmeck i thi 


d been.:made, 
the.computer space invader 


gets in on the act of mucking - 
up yourartistic efforts. You'll. 
also need to be a dab hand withr 
the scraper if you're goin . to 
keep the dripping paint on the | 
canvas oe the challenge) 


stage. 


velocity. This is no easy task 
with the Intergalactic Police 
not too happy about your 
kleptomaniac tendencies. 
Having collected sufficient 
fuel, you’re permitted a single 
sortie to loot the planet, 
avoiding the usual custodians 
of law and peace. 

Other features include 
Moronian bombs, variable 
controls on different planets 
and malfunctioning spacecraft 
for which you'll have to collect 
spares — sounds just like a QL! 

The graphics are fast, 
colourful and smooth, and the 
game is quite playable, with 
that “I know I can do better 
next time” appeal. 
Unfortunately, this interest 
only lasts so long, and is 
unlikely to keep even the most 
afflicted insomniacs awake 
into the early hours. 


G eeceeeeee 


Quasimodo 
Shadow Games 


Esmeralda must hav 
hump again, ’cos Quasim 
is missing in this classic 
arcade game. Speeding, 
leaping and swinging along 
the wall, with the speed of a 
ruptured snail, Quasimodo is 
trying to rescue his loved one 
yet again. 

Graphics are colourful, but 
slow, and certainly not up to 
the standard of other games of 
this ilk. However, it’s Hobson’s 
choice, with this being the 
only hunchback game 
presently available for the QL. 

The skill, and frustration as 
I was bowled over, beaten 
about the head with a 
truncheon, burnt to a cinder in 
fire pits and generally 
battered kept me amused for 
minutes. 


[Gieeceecee ~~ 
|: eooo S| 
QL Cavern 


Sinclair Research 


BJ’s on a mission, to enter the 
cavern and collect an 
incredible 395 diamonds. So 
starts a quite varied ‘levels 
and ladders’ adventure into 
the underground. 

On first sight, the cavern 
system appears to be very 
extensive, but after a while 
youre likely to start 
recognising the fifty or so 
different screens, even if you 
have entered from the opposite 
side of the screen. 
Nevertheless, this game 
certainly doesn’t lack variety, 
including jet packs, 
parachutes, trampolines, 
teleports, boats and lifts. 
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Mustical Merriment 


You'll have to fly, swim, run, 
leap and crawl, to reach the 
inaccessible diamonds, 
collecting your extra lives (in 
the form of hearts) as you go. 
Meanwhile, you are beset by a 
host of both animated and 
stationary obstacles. 

If you’re a good enough 
player, it won’t take you too 
long to complete this 
reasonably extensive, though 
finite game. Once you’ve 
worked out how to reach the 
diamonds, the play tends to be 
just a little too easy, and this is 
the only major drawback. 


PGeeeeceee 
PI: ecccecee | 


Zapper 
Eidersoft 


se bl atant 


Universal NEnind 
but you'll quickly recognise: 
the classic asteroids format. 

By pampering to the QL’s 
graphical strongpoints, the 


_ authors have come up with a 


very fast, playable game. 
Using line drawing 
techniques, the asteroids tend 
to be a bit angular, but they 
certainly move pretty quickly 
—must be heavy gravitation. 

As with most QL arcade 
games, graphics do have a 
tendency to slow the game 
down to some extent. In Meteor 
Storm, you're told that the 
slower speed is due to the 
automatic inhibitor circuits on 
your ship. I’m sure they don’t 
really expect us to believe this, 
but having seen the speed of 
the meteors, I’m not 


complaining. 
This is by no means the 
greatest Asteroids game you'll 
come across, and the graphics 
are a little dull, but it is still 
one of the better games 
available for the QL. 


Lands Of Havoc 
Microdeal 


Ex-Spectrum owners will 
immediately recognise this 
2000 screen Sabre Wulf 
derivative from Microdeal. 
The graphics, though not quite 
as psychadelic as those from 
Ultimate, are probably the 
best you’re likely to find on the 
QL at the moment, being 
chunky, reasonably colourful 
and extensive. 

In the game, you control a 
lizard-like man, who must 
rush about a nine sector map 
collecting various items. 
These will finally lead to the 
skull, and the entrance to the 
next phase. The game arrives 
complete with nine picture 
postcards showing the sector 
details of the initial land, and 
these must be fitted together 
tthe start of each game to 


the other should 
written. The 
i e admittedly 
aller, but the nasties are 
faster and more numerous. 
There is also a wider variety of 
aliens, and their attack 
strategies are far more 
volatile. 

Again, this game uses the 
one bullet on the screen 
method, but the frustration of 
watching your lone missile 
make its way to the top, 
narrowly avoiding all those 
obstacles that it’s supposed to 
be annihilating adds to the 
skill and excitement. 

Not an incredible game, but 
the apocalyptic brigade will 
enjoy the holocaust. 


Hyperdrive 
English Software 


It’s time to get out the 
stopwatches and count the 
laps in the first car-racing 
game for the QL. The idea is to 
complete the four severe 
stages, each in under 40 
seconds, finishing amongst 
the top five to qualify for the 
next stage. 

As car racing games go, this 
one wouldn’t even get close to 
the exhaust pipes of old 
favourites, such as the 
original — Pole Position. The 
car graphics are quite 
reasonable, however, and the 
standard oil hazards have also 
been included. Unfortunately, 
apart from this, the game isa 
non-starter. Unlike all the 
present day computer tracks, 
containing hairpin, chicanes, 
variable radius curves and 
intelligent drivers, Hyperdrive 
just has straights and a curve. 

A few years ago, this 
standard of game would have 
fared quite well. Racing fans 
may enjoy it, but don’t expect 
it to hold your attention all the 
way to the chequered flag. 


|Gieceeceeee ~~ 
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Match Point 


Psion 


The Centre Court grass at 
Wimbledon has never looked 
greener than in this tennis 
simulation/game from Psion. 
Having chosen what stage of 
the competition finals you’d 
like to begin at — you can also 
choose between a one or 
two-player game — you'll 
have to use every ounce of your 
professional skill if you’re 
going to match the 
championship level computer 
player, as the ball hurtles 
around the court. 

The 3D-like graphics are 
colourful, fast and smooth, and 
the player control is excellent; 
though yow’re almost certainly 
going to need a joystick to use 
the game properly. 

Psion still stands out as ‘the 
name’ in quality software for 
the QL. Match Point is no 
better than tennis games on 
many other micros, but it does 
prove that the QL can hold it’s 
own against the more 
dedicated games machines. 


|Giececccccecce | 
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Programs—1 


New Horizons 


Programs-—I1 is a microdrive 
cartridge containing ten 
programs, for the all-inclusive 
price of just £10. Naturally, 


UStICA 


exactly the world’s greatest 
player, and computer 
programs for this game should 


being such a bargain, the 
programs are what might be 
described as appalling (to be 


Gumshoe Logic 
MegaCycal 


charitable!) be close, yet Icouldbeat the —_ Logic puzzles are quite 

With the current lack of program on a regular basis. popular, and often found in 
software for the QL it’s On the other hand, if you magazine form at the local 
pleasing to see anybody | happen to be a fairly novice newsagents. Gumshoe Logic is 


marketing programs. | player, or just very unlucky 
However, the dismal quality of | with dice, then the program 
this package is far more likely itself is quite good. The 
to encourage QL owners to graphics, though not aw 
throw their micro in the inspiring are per 
dustbin, than write more ' adequate, and 
software. In short, you’d be program is eas 
better off either writing your There a 
own, or typing the programs —_ unusual 
from ‘The Progs’ section, 
which are of a far better 
standard. 

And, for the one born every 
minute, the ten programs are 
Lunar Lander, Clock, Reaction 
Lander, Interest Calculator, 
Biorythms Calculator, 
Laserblast, Temperature 
Converter, Puzzle, Hi-Lo and 
Utility Draw. 


a fairly original idea, which 


»: the difficulty of the-case you. 
wish, to take on — the harder 
the more money you*™ 
Youw’re then given 
ease details, which consist’ 
ithe characters and other 


| Quill ‘ordp ocessor. _Anothe 
is thé abi aul : 


Breakout 
New Horizons 


Having just finished 
ordeal of reviewin 
inimitable Prograj 
New Horizons, it 
some trepidation t 
Breakout. After all 
can write this old c 
What a surprise. T 


2 | Fantasia Adventure 
__S & B Software 


control, one or two-pla 
option, variable ball speed 
angle, and three moving walls 
with reverse bounces once you 
get beyond the first. 

The graphics are by no 
means perfect, with the 
program only using about ha 
the screen for the playing aréa 
and the rest showing the 
scores for the two players a! 
the highest score so far. 

Okay, so I was pleased to s¢ 
a decent game from a small 
company for a change. Havi 
said this, Breakout isn’t 
exactly the elite amongst 
games, and (on other microg 
I’ve seen better published in. 
magazines. At the price 
quoted, it isn’t really wort 
buying. However, if the g 
on Programs—I had been 
anywhere near this quality, i. 
would have happily paid the 
money. 


er itary 


? 


s vocabularly 

asic, but it was able 

such simple 

s as ‘Go west then 

. The only other major 
int about the program 


ole, this program wasn’t too 
_ There were annoying 
atures, such as telling you of 
bjects which you can’t then 
se. Other features were quite 
original — look out for the 
manic bagpipes! 

Having seen the standard of 
adventures (including 
graphics) which can be bought 
on such machines as the 
Commodore, BBC and 
Spectrum, I’m left wondering 
why it’s so difficult to squeeze 


board positions, 
Replay, Hints, ze 

_ two-players etc. 

, This can be high 
recommended. Not only. 
you have the best chess 
program available on the QL, 
but probably one of the best on 
any home micro. 


Super Backgammon 
Digital Precision 

Well, Digital Precision may 
think that this version of 
Backgammon is ‘super’, but I 
certainly didn’t. ’'m not 


2 minin 


errimen 


similar programs into a 


machine with at least twice as 
much memory. 


EE a ee eee 
i eesess 
West 
Talent 


Again, this is a text-only 
adventure yarn, but at least 
Talent have tried to be 


- on the trail of a band 
rdly bank robbers (the 
..You are beset in 


and alli 


g concrete set, 
d to agree that this 
rofessional product. 


‘atures associated with 
e of program, such as 
ing games, analysis 
(setting up a board), none, one 
and two player games, and so 
on. The computer has nine 
different levels of play, 
ranging from immediate 
replies up to two hours 
thinking time. It also playsa 
particularly good game, and I 
was only able to best it about 
two-thirds of the time on the 
default level (1.5 seconds 
thinking time). 

The graphics, though rather 
slow, emphasize the 
professionalism of the 
programming. Moves are 
entered by positioning a 
cursor (using cursor keys or 
joystick) and your piece then 
moves smoothly from its stack 
to the board position and all 


| the counters flip. 


The success of this program 
will depend on the interest in 
the game, which is becoming a 
little long in the tooth these 
days, but the package is highly 
recommended. 
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Mystical Merriment 
Bridge Player 


Bridge Player is “a simulation 
designed to provide practice in 
both the bidding and play of 
Contract Bridge”. As you 
would expect, the program 
includes such features as 
rebidding and replaying of 


hands. However, it is lacking 
in the equally important two 
or more player option, setting 
up particular hands and so on. 
Good players will be totally 
uninterested in this below 
standard software, whilst 
poorer players, wishing to 
improve, will certainly 
require all the missing extra 


We have attempted to be comprehensive in this survey and in most cases any 
companies not mentioned here or above within the context of QL games software 
have either ceased trading or are unknown to us. 

We would strongly advise readers in the first instance to write into any 
companies whose phone number does not appear in the above listing. 

Companies marked with an asterisk were not contacted pending evaluation of 
their software at a later date. 


The following companies were sent written requests for software to be included : 


in this roundup, but at the time of writing nothing had been received. Readers may 
draw their own conclusions as to the significance of this . . . Bedsoft, Equate, 
Intersoft, Rodent (QL) Software, Snowsoft, Summit Software, Swansoft. 

Four companies — Brainstorm, Medic, Qcode and Quest — did get back to us and 
promised faithfully to send something, but again nothing was forthcoming and we 
cannot, therefore, comment on the current quality or availability of their software. 
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features. This makes me 
wonder who the software was 


aimed at. 
guess its a matter of taste, and 


ee this case urge you to look 
i e606 2] i before you leap. 


[Gessee | 
se Fe ssccsers 
Talent Fi 


Zkul is in a similar vein as 
Graphsoft 


West, but set in the more 

traditional adventure If you consider yourself an 

surroundings of bearded avid alien basher, then Fight 

dwarves and sorcerous is ideal. Alien annihilation is 

wizards. the name of the game, and 
you'll kill more per second in 


In Zkul, you take a fairly 
mercenary part, searching for this than any other I’ve seen, 
being one of the quickest 


_ ee in the ancient 

welling place of the dwarves. 

As with West, Zkulhas a ‘cade games around. 
simple real-time feature, such rane aanl cal ae 

that if you hang about, other descending star background 
events will continue around becomes lost and confused in a 
rain of bullets, bombs and 


you. Both also include a save 

and restore feature with an battered craft. Your first job is 

unusual ‘note pad’ facility. to dock the first stage, trying 

This allows you to leave a to get the three-shooter space 

small message on a stored ship and a handy bonus. 

game which will be available Youre then harried by hordes 

when the position is reloaded. of hemdridal tesiics “area 

So, you can remind yourself of iar avant ariel 

where you are, and what to do. slaughter. Each wave is 
similar, until you reach the 


Personally, I found this to be 
next docking sequence, and 
| 
| 


Nevertheless, I must admit 
that, despite its flaws, I found 
| the game highly addictive. I 


the better of the two Talent 
adventures. Possibly because | the whole game repeats. Only 
this time, the aliens are 


I’m used to the more 

traditional style, though West | toush d (ane 

tended to be by far the most oth cae eee th 5 aie ee 

humorous of the two. Both can other games of its ilk, Fight 
can be recommended to those 


be recommended, but only if 
you can afford them. who like life in the fast lane. 


Gre 
I: eeeceooe Ff 
Area Radar Controller Knight Flight 


Shadow Games Realtime Software 


Ever fancied yourselfasanAir The age of chivalry is not yet 

Traffic Controller —I don’t dead, or so it would seem with 

anymore. After a couple of Knight Flight from Realtime 

episodes such as “This is your Software. 

captain speaking. We are now Ex-Spectrum owners will 

travelling ataheightofminus find that this one or two-player 

”, it all got just too much. _| game bears a remarkable 

Area Radar Controller puts resemblance to Winged 

you in the controller’s chair, Warlords, previously released 

flying between 10 and 69 by CDS Microsystems. The 

planes (up to 26 on the screen __ idea is that you’re a knight 

at any one time) literally by who flies around on some giant 

the seat of your pants. There —_ bird — hence the title. 

are two runways and nine exit Using left, right and ‘flap’ 

lanes. You have tomake sure (via the space bar), you spur 

that all the aircraft arrive at | your mount amongst the 

the right destination andthe __ perches, crossing lances with 

right height. It’s no good other knights in the fray. 

trying to land a military jet by Having dismounted them, by 

telling it to drop from 6000 to _clouting them over the head 

1000 feet ina matter of yards. from above (not exactly 

, Well, youseeithadtogetover sporting, eh chaps?), you must 

this other plane that was in collect the egg which is 

the way, and... dropped, before it hatches into 
Graphics are poor and the a meaner knight. Invincible 

sound is evident and annoying dragons, swamp serpents and 

(there doesn’t seem tobe any _ tougher knights await the 

way to turn it off). This game __ battlefield’s victor. 

left me with a feeling 

reminiscent of those old school 

reports, “could do better”. 


pMe 
oF ARs 


REALTIME 7.) SOFTWARE 
eS 


ape 
“narre® 


* ADDICTIVE ARCADE ACTION 

* CONTINUOUS MUSIC AND SOUND EFFECTS 
* UPTO 21 MOVING FULL COLOUR SPRITES 
* ONE OR TWO PLAYER GAME OPTION 

* JOYSTICK/KEYBOARD 


In the days of chivalry when the world was still full of myth. 
and wonder, the newly knighted went out into the world 
to seek fame, glory and to prove their courage. 
However, very few could have dreamt of adventure such 
as awaits you now. A powerful bird as your mount and a 
dark and mysterious battlefield upon which to show your 
valour and demonstrate your knightly skills. 
You will face many adversaries, of differing talents, who 
will not shirk from attacking you in number. Other dangers 
lurk in waiting for you to tire in your fight before taking the 
. field to prove to be an almost unbeatable menace. 
The ground itself is not always certain, and beware the 
R R Pp swamp below, who knows what terrors may lurk in its 
egGen = murky depths. 
£14.95 So mount up and sally forth on your quest in order that 


you may hang your banner in the heraldic hall of fame. (e, 
| ee es ee ee ee eee ee ee ee ee ee ee eee ee eee Soll 
REALTIME GAMES SOFTWARE LTD 


PROSPECT HOUSE, 32 SOVEREIGN STREET, LEEDS LS1 4BJ. 
Tel: (0532) 458948 


/ | enclose cheque/P.O. for £12.95 (inc. P & P). 
Complete in BLOCK CAPITALS please. 


tm 


The Ultimate Arcade QL User 
Challenge for which you Exclusive 
need: only 
@ Deadly accuracy a 
@ Split second timing 
@ Lightning reactions £ 9 a 9 5 

and : 
@ Weeks of intensive | 

training : d, Mail order address 

Mi y oS 13 Amblerthorne, Birkenshaw, 
Supercast machine code action ae, Byarierd, West Sormeiiee 
— 20 levels of play, no two levels Please send me a copy of MASTER 
the same — 100% machine code Re eae 
~ vivid and imaginative eae ave oe Nabi 
graphics — complex multiframe Name 
animation — joystick compatible Harness 
Telephone: 
COMP UGEM LTD 01-731 7948 | Please allow 14 days delivery fy 
=| 
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This is the spot where we turn 
the magazine over to you, our 
readers. We welcome any 
comments, criticisms or 
anecdotes about either the QL 
or QL User. The address to 
send your letters is: Open 
Channel, QL User, Priory 
Court, 30-32 Farringdon 
Lane, London EC1R 3AU 


I would like to purchase a 
monitor for my QL. Looking at 
what is available it seems that 
14” colour TV’s with RGB 
inputs offer better value for 
money. But do they perform as 
well? 

Secondly, an article on the 
QL’s system variables would 
be very useful. For example 
when designing children’s 
games programs it is desirable 
to extend the “auto-repeat 
delay” (ie, the time after 
which, if a key is held down, 
the QL automatically 
generates further ‘presses’ of 
that key). This variable is 
stored at 2808C (in hex) and 
has the default value 30 
(decimal). The delay may be 


changed by 

POKE_W 163980,n 
where 7 can be a value from 0 
to 32767. 

What is needed is a list of all 
variables which can be safely 
altered, their default values 
and the usable range of values. 
Rob Wilson 


Cirencester 


Most manufacturers 
specify a minimum 
bandwidth for signals a 
monitor is capable of 
receiving. This figure is a 
useful measure of the 
machine’s worth. 
Approximately 1MHz is 
required to display 60 
pixels on a line. So for the 
QL with 512 pixels per line 
the minimum requirement 
would be 9MHz. In general 
the higher the figure the 
better the display. TV’s 
typically operate at 4.5MHz 
whilst dedicated monitors 
average around 18MHz. 
Another thing you should 
bear in mind when 
considering a TV with an 
RGB socket is that the QL 
emits a non-standard signal 
(ie the line flyback period 
differs from standard). So, 


you may find that the 


display overruns the edge 
of the screen. This can bea 


BRITISH RAIL 


[G20 


ST PROPERTY 
OFFICE Z 


“Once it was briefcases — now all we get is personal computers!” 
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real problem. 

As regards your 
suggestion of publishing a 
list of system variables, our ° 
Secret Locations article 
(March 1985) covered fixed 
calls such as the one given 
here in detail. Furthermore, 
this month’s Owner’s 
Manual provides a 
comprehensive list of 


.QDOS system calls. 


Archive Angst 


I have been using Archive for 
three months and have 
created a large database 
whose contents are quite 
important to me. This week I 
forgot to close the file. The file 
on my backup is also 
corrupted. So I am in trouble! 
Whenever I try and load either 
file I get the error message 
‘wrong file type’. Is there a 
trick to get the file back into 
the computer? 

Lex Hogenbosch 

Netherlands 


Unfortunately, there’s no 
quick solution to your 
problem. However, we will 
be publishing a set of 
programs which enable you . 


. to recover data lost in this 


fashion. 


Ihave just purchased a Philips 
BM7502 green screen monitor. 
I must say that it is excellent. 
When you press F1 for Monitor 
Mode the display splits into 
two parts, the left pale and the 
right dark. The left shows 
input and the right anything 
from microdrive. 

Now I want the screen to 
become one as in TV mode and 
allow me to use the full screen 
for programming. How do I do 
it? 

C Stories 
Humberside 


Irrespective of the mode 
selected the QL 
automatically opens three 
channels to the screen. 
Channel #0 for typing in 
commands. Channel #1 for 
displaying any information 
using the PRINT statement 


and channel #2 for listing 
programs. A window is 
_ linked to each of these 


channels and it is this that 
varies according to which 
mode you select. In TV 
mode the windows for 
channels #1 and #2 are 
placed one on top of the 
other. In monitor mode they 
are placed side by side. 

To alter the windows 
from monitor mode to TV 
mode you need to use the 
WINDOW command as 
follows: 

WINDOW #1,448,200,32,16 

WINDOW #2,448,200,32,16 

If you want to use the 
whole of the screen for all 


. your output try the 


following: 
FOR n=0 TO 2:;WINDOW 
#n,512,256,0,0:NEXT n 


Bare Bones 


Now that I am acquainted 
with the workings of Quill I 
find that I can delete, from my 
cloned copy, the following files: 


QUIL_HOB 
INSTALL_BAS 
INSTALL_DAT 
CONVERT_BAS 


and still get everything I 
want. Before doing so I have, of 
course, installed my printer 
and if I want to do so again I 
can always go back to the 
original copy of Quill. Getting 
rid of the files liberates no less 
than 71 sectors, roughly a 
third of a microdrive cartridge. 
I would now like to know 
how I can convert F1 and 
possibly F2 to perform another 
function? Also, can you tell me 
if there is any way to achieve 
text composition over two 
columns (ie., for indexes)? 
J WM Stone 
Oxford 


The only way to reprogram 
the Function keys would be 
to amend the code in 
Psion’s Quill program. As 
this is virtually impossible 
we suggest you use the 
translate facility on your 
Psion printer driver. 
Assuming that you do not 
use the characters ~ and | 
then these can be used to 
switch on and off italics 


respectively. The 
appropriate entry using 
EPSON control codes 
would be: 

TRANSLATE2: 

“~ ESC,52 

TRANSLATES: 

“| ,ESC,80 
With regard to two column 
text composition there is no 
way of doing this on Quill 
other than simply tabbing 
across from one column to 
another. Unfortunately this 
means that you lose out on 
automatic justification etc. 


Debriefing 


Iam a newcomer to the 
computer world and don’t 
know much about computers. 
Often I have read of 
Assemblers, Disassemblers 
and Monitors. Would you 
please give me a brief idea of 
what each of these do and can 
you tell me which one would be 
used to write machine code 
programs. 

A A Matauer 

Saudi Arabia 


Machine code programs 
contain coded instructions 
in the QL’s native tongue. 
The programs can be typed 
in directly but the process is 
extremely difficult as each 
machine code instruction is 
a complex binary sequence 

In Assembly language a 
meaningful mnemonic (ie, 
ADD, SUB, MULT) is used 
instead of a binary 
sequence. Writing in 
assembly language is very 
much easier than machine 
code and for this reason 
almost all machine code 
programs start life as 
assembly language 
programs. These are then 
converted into machine 
code using a program 
called an Assembler. So, if 
you want to write your own 
machine code programs 
you need to learn assembly 
language and buy an 
assembler. 

A disassembler does the 
exact opposite of an 
Assembler. It takes 
machine code programs, 
which will run on the QL 
and converts them into 


Assembly language 
programs. 

A Monitor, on the other 
hand, allows one to 
interrogate a machine code 
program whilst it is 
running. It provides a 

variety of features. It allows 
one to step through the 
program instruction by 
instruction, examine the 
contents of memory and 
even amend it. 

Both Disassembler and 
Monitor are debugging 
tools and are vital if you are 
new to machine code 
programming and prone to 
making errors. 


Model Mania 


Am I right in believing that 
the first three characters 
starting with “D” of the 
number imprinted on the base 


‘of the QL is the hardware 


revision number? Does the 
rest of the number indicate 
what version of the ROM is 


_ included. Do you have any 


suggestions on how I can shop 
for a QL and be confident that 
have acquired the latest 
model? 

J Armstrong 

Salisbury 


There’s no mystery about 
the QL’s serial number. 
Quite simply, the two 
figures after the “D” 
represent the number of 
months after the launch 
and the rest, coming after 
the hyphen, is the number 
of QLs made at the time 
your particular machine 
left the production line. 

As for getting hold of the 
latest model. All I can 
suggest is that you ring 
around and find out who’s 
stocking which versions of 
the hardware and software. 
Versions 2.00 of Psion’s 
packages and JM of QDOS 
are quite acceptable. 
Versions 2.30 and JS 
respectively are even 
better, though exceedingly 
hard to come by. To find out 
the version numbers 
examine the loading 
screens on Psion’s 
programs and type PRINT 
VER$ for QDOS. 
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BJ Bites Back! 


An interview with the prolific 
Janko Mrsic-Floegel — 
programmer extraordinaire 


Archive Recovery 


Retrieve your corrupted 
Archive data, bit by bit 


Beginner’s Guide 
One way to ‘Get the most out of 
your QL’, this Christmas 


Astrological 


Aspirations 

The QL as a fortune-teller — 
not quite, but it’ll simplify the 
maths involved 


Toolkit Tournament 


A grand contest of all the 
caifferent programmer’s 
toolkits 


2 
On Disk 


An introduction to disk drive 
operation and when to call in 
the doctor! 


Languages To Learn 


Boasting several unique 
languages, the QL leads the 
home micro scene 


SuperBasic Extensions 


Add a command here and a 
keyword there and create a 
more comprehensive BASIC 


ALL INSIDE THE 
January 1986 Edition 
ON SALE | 
21st DECEMBER 


Contents subject to last revision 


Microdrive Storage Box 


Fully interlocking e Holds 20 cartridges + index cards 


MiGrOdhiVe BOX... cee cutaes sua dines fA.95 
Microdrive Box + 10 blank cartridges . . £22.45 
Microdrive Box + 20 blank cartridges. . £39.95 
Blank cartridges ................05. £1.95 
QL Dust Covers ., £5.00 
Spectrum Monochrome Monitor Connector . . . £11.50 
@ Spectrum RGB Interface .......... _, £45.00 


Disc Storage Boxes 


e 3%2” Disc Storage Box Holds 25 discs....... 99.20 , £9 20 
e 5%" Disc Storage Box Holds 50 discs...... $13.90 
= @’ Boxcor lO'SVo" S7SIGISCS “hs ox 2% 3 40 Sarda ness e000 
e Box of 105%" s/sdiscs ......... 0... 000 §27.6 
Avallapie from W.H. Smiths, e Storage Box (holds 30 3%” discs or 20 3” discs) $13.25 


John Menzies & Spectrum Stores. 


TRANSFORM LTD. (DeptQL ) 089283 4783 
Lucks Lane, Paddock Wood, Kent TNI2 6QL 


SINCLAIR 
iF SOFTWARE BY 


AREA RADAR CONTROLLER 


airways. Don't run out of 
fuel and avoid collisions. 


A fascinating game and 
simulation. Control up to 
69 aircraft in a busy air 
traffic zone which 


Very addictive — highly 
frustrating. Keyboard 


includes 2 airfields and 9 


Please send me the following products on microdrive 


cartridge for the QL: 


only. 


Area Radar Controller @ £12.95 


Quadimodo @ £12.95 
Space Paranoids @ £12.95 
Night Nurse @ £12.95 


Star Guard/Gal. Invaders @ £14.95 


Blast Buggy @ £12.95 
Paint Master @ £14.95 


Address .... 


Please make cheques/postal orders payable to Shadow 


Games, and send to: 


SHADOW GAMES, 70 Gooseacre, Cheddington, 
Near Leighton Buzzard, Beds. Tel: 0296 668740 
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QUAZIMODO 

Help our hero rescue 
Esmerelda. Jump the 
battlements and avoid the 
soldiers, rocks, arrows 
and the mad axeman. 15 
screens of brilliant 
arcade action. Keyboard 
or joystick. 


SPACE PARANOIDS 


A fast moving alien zap 
game with 9 different 
aliens and 40 different 
attack waves. Keyboard 
or joystick. 


STAR GUARD/ 
GALACTIC 
INVADERS 


Unbeatable value. Two 
good arcade games for 
the price of one. 
Keyboard of joystick. 


BLAST BUGGY 


Drive your buggy across 
an alien landscape, 
jumping the craters and 
shooting the many aliens 
which are out to get you. 
Keyboard or joystick. 


NIGHT NURSE 

An arcade adventure 
with extra large detailed 
graphics. Guide Nurse 
Gray round St Spooks 
Hospital, avoiding randy 
doctors and Paranoid. 
Pete. Keyboard or 
joystick. 


PAINT MASTER 


A graphics package, 
demonstration pictures 
and adventure. Ideal for 
adding pictures to yor 
own programs. No 
royalties required. 


A CHRISTMAS QL? 


Will the ghosts of the past, present 
and future haunt the QL this 
Christmas? Mary Sargent finds out. 


Dixon’s promotion of the QL and the 
dramatic drop in price to £199.95 for 
the basic computer and four inte- 
grated software packages has been 
the starting point for yet another 
round of publicity for Sinclair 

Research. Once more, everyone has 

an opinion as to whether it will boost 

sales or bury the product for all time, 

and in that sense at least, it 

demonstrates the QL as Everyman’s 
computer. 

' _ The Spectrum established itself as 
the micro for the masses by selling in 
phenomenal numbers, and it’s still 
among the best-sellers. No-one could 
pretend that the 16-bit machine has 
been a success to follow that, but 
equally it should not be written off. 
Whichever way you look at it, you 
have to admit that an awful lot of 
people have heard. of the QL, and 
since it now costs less than the aver- 
age colour television set, it could just 
convert some of its massive publicity 
into hard cash. 

Dixon’s, which also means Curry’s 
and Bridges, wanted the machine 

- because it represents a way into the 
“sophisticated home user” market 
and have emphasised that the twin 
microdrives were a feature of the 
machine which the company particu- 
larly liked. Whilst one would have 
welcomed a rather more detailed 
appreciation, that statement does in 
fact mean two things. In the first 
place, it indicates that Dixons, which 
is busy turning its branches into the 
Mecca of the computer retail trade, 
recognises the need to cater for users 
who can exploit the capacity of a 16 
bit micro to the full, and that it per- 
ceives the QL as fulfilling that 
market. It also means that the 
organisation has faith in the reliabil- 
ity of the machine as it now is. After 
all, it is the retailer who is responsi- 
ble to the consumer for poor products, 
and no chain store is likely to deliber- 
ately take on a micro if it believes it 
will be opening its doors to a stream 
of dissatisified customers. It is 


reasonable to assume that claims. 


that the QL’s problems have been 
ironed out are true. 

The question remains whether the 
price-cut will encourage potential 
buyers to forget the past and investi- 
gate what the machine can offer 
them. Freddy Vaccha, Managing 


Director of Digital Precision, a soft- 
ware house specialising in programs 
for the QL, has always believed that 
it is “a Rolls Royce of a machine,” and 
that its operating speed in machine 
code is an inducement to all serious 
programmers to consider buying it. 
Apart from these afficionados, who 
are likely to have already sized up 
the QL, he identified three possible 
categories of micro-seekers. 

“Those who have already decided 
that they need a home micro, and 
that the QL is not what they want, 
will have their prejudices confirmed 
by the price-cut. These are the 7 


need a micro, but have remained 
open-minded or are actually 
attracted to the QL. For them, the 
drop in price is likely to be decisive, 
and they will buy. Those who have 
not yet fully convinced themselves 
that they want a micro might just be 
persuaded by the price, which repre- 
sents excellent value. Compare 
£199.95 plus £75 for a mono monitor, 
with around £750 for, say, the Atari 
520ST.” Whilst he concedes that the 
QL will never be the World’s number 
one micro, he’s confident it will sell 
well this Christmas. 


Price And Prejudice 


Jeff Warren agrees that it should. 
At £400 it was a better machine than 
the press ever admitted, at £200 it 
represents extraordinary value. Jeff 
is a senior lecturer at a College of 
Technology with more than a passing 
interest in the capabilities of a com- 


puter. He lectures, amongst other 
things, on the use of computers in 
education and on the role they have 
to play in conservation and, on a day- 
to-day basis, he relies heavily on a 
word-processor. He considers Quill a 
useful package both as an excellent 
simulation of commercial word-pro- 
cessors which cost a great deal more 
‘than Quill, and as a well-documented 
program which adequately 
demonstrates the functions and vir- 
tues of word-processing to novices. 
He is particularly impressed by the 
simple help facility common to all 
four packages that gives detailed 
instructions on their use at the press 
of a button. 

His wife Barbara runs Calpac, an 


2 es 


j as : 

is AY 
educational software house whose 
accounts Jeff has put onto the QL 
using Abacus, the spreadsheet pro- 
gram. He’s pleased with its versatil- 
ity and the fact that it can be re- 
designed by the user to take account 
of individual requirements, and he 
has underlined the point by using it 
to calculate his students’ examina- 
tion achievements. The college uses a 
complicated system requiring sev- 
eral different marks from different 
parts of the course to be taken into 
consideration, and given different 
emphasis. It’s an operation which 
‘would involve a lot of time and possi- 
ble error if done manually. Abacus 
copes in seconds. 

Archive is used for storing statis- 
tics gathered on field trips by stu- 
dents following the conservation and 
ecology courses with which Jeff is 

| involved. Manipulation of the statis- 
| tics is achieved by applying Abacus, 
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as for example when plant distribu- 


tion for a particular area is required | 


in percentage form, an exercise 
which uses the twin-microdrive 
feature emphasised by Dixon’s 
spokesman. Compared to conven- 
tional cassettes, they are far 
superior. 


The Ideal User 


In some ways, Jeff Warren is 
Sinclair’s perfect customer. His first 
home micro was a ZX81, he 
graduated to a Spectrum and put his 
name down for a QL as soon as it was 
announced. Delays and dongles not- 
withstanding, he took delivery of one 
of the earliest machines, nursed it 
through its teething troubles and 
accepted the new improved version 
from Sinclair when the add-on ROM 
was finally integrated into the main 
casing. He has never altered his opin- 
ion that the QL was well worth the 
wait, and has expanded his use of the 
machine as his knowledge of it 
increased. As an academic, he uses it 
for administration and writing, as an 
associate in a small business he uses 
it for book-keeping and in his spare 
time he programs in BASIC for fun, 


His sons would like to play games on. 


it, but don’t get much opportunity 
due to their father’s enthusiasm for 
structured programming, QL style. 

He maintains that, Wheredlee it is 
perfectly possible to perpetuate poor 
programming habits, learned in past 
days on less sophisticated machines, 
the QL in fact offers the ideal oppor- 
tunity to purists (and students!) to 


learn the real logic and precision of 


computer programming at its best. 
For this reason, he would like to,see 
many more ventures along the lines 
of the Strathclyde experiment, where 
a scheme is underway to provide a 
majority of students at the Univer- 


sity with their own QLs by the end of 


the decade. He feels thatthe co itinu- 
ing dominance of the BBC micro in 


schools and colleges is unacceptable, 


when the QL offers‘so much more in 


terms of memory, graphies ee . 


and business software of 
with which students need ee 
familiar, prior. 
into the world of ir 
merce. : 

And in that orld of commerce, the 


ustry and com: 


form. 


The launch delays 


complete QL sys 
of the competi 
public relatioi 


them 

The men involved 
ship had spent some years working 
for large organisations, and the deci- 
sion to set up on their own was not 
taken lightly. They needed a low-cost 
hich offered flexi- 

bility together with a range of busi- 


ness software, and they chose the QL. 


Archive, Quill and Abacus were all 
used in ‘the planning stages of the 


business, for financial projection, — 


database storage of advertising 
media and potential clients, corres- 
pondence and the like. The micro was 
found to be efficient, the software 
invaluable. The four Psion packages 
offer facilities which for any other 
business machine, would be sold on 
their own for more than the total cost 
of the QL hardware and software 
together. 


There is perhaps a problem here. 


Despite the statistics on the number 


of businessmen unwilling to pay — 
lange sums for computers, there are 


still many who are victims of the “you 


get what you pay for” school of ee 


reasoning. 


By 
Big. Business 


‘This states quite clearly that IBM 


is the name for business machines, 


and therefore, if you run a business 


you must have either the thing itself, 
or a not noticeably cheaper look- 


alike, and no system costing less 
than £2,000 or £3,000 can possibly do 


what you want it to. The 


driving around i 
e strength 


QL has found its way into eee ofthe and « 


small businesses whi 
Sinclair’s original Aar 
Initial and quite -deta 
research had revealed th 
in Europe of some 18 mil 
businesses, man 


finance and 
not comput 


for , nple 
of themt we re, and 
t th 


“set up in 
an year, has 
both 


he partner 


ere area great 
many highly successful computer 
salesmen in expense-account suits 
pany cars on 

deology, and 
price ofthe - 
jlally,many — 

oul have been 
_ with sufficient pr 


ackages written 
out under the 


DL 

_ Research banner. They range from 
business _ Feniaees and program- 
mers’ utilities through the less _ 
: demanding offerings such as sprite _ 
generators and Astrology programs, _ 
to the frankly frivolous adventure 
and arcade games. 
You can plan your household 
accounts, write your own games, _ 
design a garden, plot your family _ 

tree, study the principles of business _ 
planning, learn totouchtypeoreven _ 
base major decisions on data 
QL in advance, _ 
before relaxing with a few aliens, or _ 
exploring a few adventurous prob- _ 
lems. Just as with any other micro, _ 
_you pays your money and you takes © c 


examined by the 


your choice. 


Compared with the BBC, Spectrum, 
and Amstrad micros, of course, the 


software support is not massive 

it is surely relevant to ask, just ho 
much software is any one user lik« 
to need? Much of the stuff aro 

the more popular home micros 


bish, and the real choice of programs 


is reduced considerably by that f: 
It’s often difficult to identify a wor 
while program, simply because th 


although sor 
with, much o 


‘were nominated for a 


Computing award, an 
Entrepreneur program won 


Psion packages which come 
QL are acclaimed by both those ° 


there and there is ‘much | in 


_and high hopes of, Digital Pre 
‘SuperBasic Compiler, due for 


very shortly. _ 
All in all, the aohware scene 


regards the QL is decidedly healthy, _ 
rograms availableto _ 
satisfy all but the most avid of micro- _ 

enthusiasts, and a large enough 
range in most categories to ; a 


fe realistic choice. 
Th 


- e Lis no longer a prest  pro- 
— duct. It is a good one, aad 
att acted ame good s 
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NAME 
COMPANY 
ADDRESS 


POSTCO 


lencloseachequefor£____——_—or 
debit my ACCESS/VISA Account No. 


RGSRSCRN AAA: 


2 Se i SE Candi ex pinyidateet ame. at he 


Price includes VAT, postage and packing UK mainiand only. Immediate delivery ex stock. 


silicon 1 
=Press ae UNEQ 


For immediate despatch of goods you can order 
now by phoning us on Leicester (0533) 374917 
quoting your Access card number. 


Or fill in and post the coupon - no stamp 
required - and we will despatch your goods 
within 14 days 


ORDER FORM PRICES INCLUDE VAT, POST AND PACKING 


Please allow 14 days for delivery of postal orders,telephone orders, immediate despatch 
____ Insider Disk Interface Board @ £113.85 

___ Single 80 track double sided 3 1/2" drive system INCLUDING Insider Board @ £199.00 
___ Dual 80 track double sided 3 1/2" drive system INCLUDING Insider Board @ £270.00 
___ Single 80 track double sided 5 1/4" drive system INCLUDING Insider Board @ £219.00 
____ Dual 80 track double sided 5 1/4" drive system INCLUDING Insider Board @ £299.00 
___ Microvitec 1451 DQ3T colour monitor @ £299.00 


COMPLETE 
DISK SYSTEM WITH 
INTERFACE 
~ 153 


___ Centronics printer interface @ £29.95 


___ NEWS512K QL with 1 Year Warranty @ £325) 0 

____ 512K Internal Memory Upgrade @ £150.00 * 

___ 512K Insider Memory Board @ £199.00 

| enclose cheque/postal order for £ made payable to Silicon Express Limited 
Name & Address 


“For internal memory upgrade, please send your QL RECORDED DELIVERY together with 
our remittance or Access details for £150.00 to Silicon Express Limited, Silicon House, 


| 

| 

POST TO: Silicon Express Ltd., FREEPOST, Rothley, Leicester LE7 70Z 
owke Street, Rothley, Leicester. LE7 7PJ 


CENTRONICS 
PRINTER INTERFACE 
J Connects QL to any centronics 
compatible printer 
Plugs into SER1 or SER2 port 
and directly into printer 


Fully self-contained with 3 metre 
cable 


CENTRONICS 
PRINTER INTERFACE 
£29.95 


el, 


512K. INTERNALN 
MEMORY UPGRADE 
£150 


INSIDER DISK 
INTERFACE CARD 
£113.85 


DISK 
CARD 


‘ase of the QL, 
iin expansion port 
e ROM - based 


512K INTERNAL 
MEMORY UPGRADE 


Expands the QL's memory from 
Lee ELE 128K to 512K 
| F re Leaves the expansion slot free 
agence for other boards 


Internally upgraded at our service 
centre - see address below 

(NOT FREEPOST) 

7 Day return service 

Contact our Sales Desk for further 
details 


tee 


512K Insider Memory Board also available 


* Plugs into the main expansion port 
DISK DRIVES * Operates at full speed - no wait states 
* 3 1/2" single or dual 80 track sA9S00 
double sided 
* 5 1/4" single or dual 80 track 
double sided 
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In this, the final part of our 
series, Mike James and Kay 
Ewbank push Al to its limits 
in search of meaning and 
understanding. 


arious programs, (Eliza 
for instance), have shown 

that it is possible to 
convince many users that a 
computer can understand 
what is typed on its keyboard 
even though it is quite clear 
from an examination of the 
program that there is no way 
that it can achieve anything as 
sophisticated as 
understanding the meaning of 
English. 

The trouble is that it is 
difficult to establish exactly 
what understanding is. For 
example, it seems reasonable 
to say that understanding can 
be inferred by observing what 
happens after something has 
been said. If someone is asked 
to make a pot of tea and they 
do, it seems reasonable to 
conclude that he or she 
probably understood what was 
said. By the same logic it 
follows that the QL 
‘understands’ a BASIC 
program whenever it obeys 
the instructions it contains. 
But the QL clearly doesn’t 
understand a program in the 
same sense that the program’s 
creator does! 

The difference between the 
two types of understanding is 
difficult to pin down but it 
seems to have something to do 
with the existence of an 
adequate model of the 
external world and the ability 
to use it to respond to an 
instruction in a flexible way. 
For example, the traditional 
joke about a computer making 
a cup of tea is that it fails for 
some silly reason such as the 
kettle being empty which it is 
assumed a human would 
easily put to rights. The 
difference is that a human has 
a great deal of information, in 
the form of an internal model, 
that can be used to examine 
the feasibility, consequences 
and problems of complying 
with an apparently simple 
instruction. Indeed the 
existence of an internal model 
is even more important in that 
it plays an important role in 
deciphering the meaning in a 


sentence. For example, the 
sentence “We went down to the 
bank” is ambiguous unless you 
have just been following a 
conversation about fishing. In 
this case your internal model 
of fishing should let you know 
that ariver bank rather thana 
financial institution is likely 
to be involved! 


Mental Models 


Clearly internal models of the 
world are essential to any sort 
of intelligent understanding of 
the world. The only problem is 
that currently we have very 
little idea of how to represent 
anything remotely 
complicated in a computer 
memory. The sophistication of 
a memory depends not so 
much on raw storage capacity 
but on the variety of 
relationships that it can 
maintain. The simplest sort of 
computer memory forms links 
between pairs of items — one 
item is regarded as an address 
and the other item the data. 
The most sophisticated 
memory that we know of, the 
human memory, is 
characterised by the wide 
variety of links that are made 
between items of information 
stored within it. Indeed the 
links can be made with such 
wild abandon that the rigid 
notions of what constitutes 
‘address’ and ‘data’ have to be 
modified. Items of information 
may be used to recall others, 
which may then be used to 
recall yet more items, and so 
on. Here, an item of 
information can be considered 
to be an address when it is 
known and is being used to 
recall other items of 
information associated with it. 
This suggests that if we 
want to construct more 
sophisticated models it is 
worth investigating methods 
for increasing the ways of 
linking items of information 
together. The first and most 
obvious improvement is to 
allow any number of links in 
any direction to exist between 
any pair of items. This type of 
memory is usually called a 
relational store. For example, 
in Fig 1 separate items of 
information are linked 
together so that, for example, 
‘name’ can be found from 
‘address’ or even ‘telephone 


number’. 
Address 


Telephone Number | 


Fig 2 


A modified but practical 
form of the relational store lies 
at the heart of a wide range of 
commercial software — usually 
called relational databases. A 
relational database holds lists 


to TOM by IS A relations. 
Thus the answer to “DOES 
TOM HAVE FUR’ is found by 
examining the HAS 
relationships coming from 
CAT. That is — 


Fig 3 

of information and uses 
pointers to enable information 
to be stored economically and 
recalled using a variety of 
addresses. 

The relational database has 
the potential to become an 
important part of AI research 
in the next few years. 
However, it is by no means 
the final word in increased 
sophistication! 


Semantic Nets 

The links that we have been 
using to associate one item of 
data with another have so far 
all been of the same type. They 
are anonymous arrows or 
pointers that simply bind 
items of information together 
without indicating what it is 
that causes them to be joined. 
This is obviously not sufficient 
to represent complex models of 
the world. Ahuman memory is 
very different because it links 
items together with named 
relationships. For example, in 
Fig 2 therelationshipsbetween 
the items of information TOM, 
CAT, TAIL, FUR, SOFT and 
MALE are shown. 

You can see that the 
relationship between TOM 
and CAT is different to that 
between TOM and TAIL. That 
is TOM JS A CAT but TOM 
HAS FUR. The fact that the 
relationships IS A and HAS 
are different only really 
becomes apparent when the 
memory is being searched. 

For example, if you want the 
question “DOES TOM HAVE 
FUR” answered then as well 
as looking at the item TOM for 
HAS relations you have to also 
examine the items connected 


means that TOM does have 
FUR. 

This type of memory, using 
named relationships, is called 
a semantic network. A general 
semantic network can be very 
complicated but it is possible 
to produce a small example in 
Super Basic to show how 
things work and to provide the 
starting point for experiments. 

To produce a program that 
will store this sort of system of 
items and named relations it is 
first necessary to solve the 
problem of representing the 
named links. Each item of 
information can be stored in 
an element of a string array, 
W$ say. When an item is 
encountered it is simply stored 
in the next free element of the 
array. The item that it is 
linked to is of course also 
stored in the array and we 
could indicate which one it 
was by storing its index in 
another array, P%. For 
example, if the array W$ 
contained: 


W$(1) = TOM 

W$(2) = TAIL 

WS$(3) = CAT 

W$(4) = FUR 
Then the link between TOM 
and TAIL and CAT and FUR 
would be stored in P% as: 

P%(1) = 2 

P%(2) = 0 

P%(3) = 4 

P%(4) =0 


In other words, the item that 
W$(D is linked to is stored in 
P%(1). A value of zero in P%(I) 
indicates that the item is not 
linked to anything. This 
combined use of the arrays W$ 
and P% gives us a simple 
relational database because, 
although the links are all 
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represented, they are 
anonymous. The simplest way 
of storing the names of the 
links is as items of information 
in the array W$. To associate 
the name of the link with its 
use we also have to use 
another array R% to store the 
index of the name. 


how information gets into it 
and how information can be 
retrieved. The simplest way of 
allowing the user to store 
information is via the English 
sentence construction, x 
relation y where x and y are 
items to be stored and 
connected by the link 


is an item 


rau is the index of the item it is linked to, 
ie. it is linked to WS(P%(1 ; 


Fig 4 

For example, adding the 
names of the relationships to 
the previous contents of W$ 


Thus W$(1), TOM, is related to 
W$(P%(1)), TAIL, and the 
relationship is W$(P%(1)), 
HAS. Notice that the value of 
R&T is set to zero when there 
is no relationship to label. 
The only remaining 
problem is what happens 
when there is more than one 
link from an item. This could 
be dealt with by making both 
P and R two-dimensional 
arrays and using them to store 
all the links and the names of 
the relationships for each item 
— P%(1,1) would store the 
first link for the first item and 
P%(1,2) would store the 
second link for the first item 
and so on. The solution 
adopted by the program given 
in Listing 1 is simpler but can 
be slower. Each time an item 
appears it is stored in the 
array W§, even if it is already 
present in the array. So to add 
TOM IS MALE to the memory, 
the three items TOM, IS and 
MALE are stored in W$, and 
P% and R% are set to point to 
the correct items. That is — 


In practice this duplication of 
items allows us to store 
information in memory 
without checking to see if it is 
already there and doesn’t 
cause any practical problems. 
Now that the problem of 
representing the structure ofa 
semantic net has been solved, 
all that is left is to work out 
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named relation. 

TOM IS A CAT 

TOM IS MALE 

TOM HAS TAIL 

CAT HAS FUR 

FUR IS SOFT 
describe the information 
shown in Fig 2. Using this 
limited form of English 
ensures that it is possible for 
the program to separate x and 
y from the relation. The rule 
used is that the first word is 
item x, the last word is item y 
and any words in between 
form a description of the 
relationship. 

Once information has been 
entered the memory is only 
useful if it can be used to 
answer questions about its 
contents. Using the form of 
representation that has been 
described it is possible to 
implement many different 
types of question-answering 
routines but, to keep things 
simple, the program (Listing 1) 
attempts to handle the 
following three types of 
question — 

TELL ME ABOUT x 

DOES x HAVE y 

ISxAy 
Once again because of the 
restricted format of these 
questions it is easy for the 
program to detect the type of 
the question and the items 
mentioned within it. The first 
question is detected by the 
first word being TELL and the 
last word is taken to be x, 
similarly the second and third 
questions are detected by the 
first word being DOES or IS 
respectively and the second 
word is taken to be x and the 
last word is taken to be y. 

What happens when one of 
the three questions is detected 
varies according to the 
question. To answer the TELL 
ME ABOUT «x question the 
program has to search for all 
occurrences of x in W$ and 
then print out the relationship 
W$(R(T)) and the item it is 
related to, W$(P(I). However, 
if this is all it did the question 
TELL ME ABOUT TOM 
would have the answer TOM 
IS A CAT-HAS TAIL-IS 
MALE. By following the IS A 


relationship to CAT you can 
also discover that TOM HAS 
FUR-—IS SOFT. 

To answer the question 
completely the program 
should follow all of the 
relationships with TOM 
through all of the net. So the 
programs response to TELL 
ME ABOUT «x is to print every 
connection that x has with 
everything else in the memory! 
To answer the DOES x HAVE 
y question it is necessary not 
only to examine the direct 
HAS relationships but also the 
HAS relationships of items 
connected tox by ISA 
relationships. So DOES TOM 
HAVE FUR would be 
answered by the following 
chain of relationships TOM is 
a CAT has FUR. Similarly the 
IS x A y question has to be 
answered by following IS A 
relationships. So if we add 
CAT IS A ANIMAL to the 
memory the answer to the 
question IS TOM A ANIMAL 
would be answered by the 
following chain of 
relationships 


TOM. When the word is found 
the type of the relationship is 
checked. If it is HAS y then the 
item y has to be checked to see 
if itis FUR. If it is, the 
question is answered. Ifit isn’t 
then the array is searched for 
another occurrence of TOM. 
However, ifan IS A y 
relationship is found then the 
index of the item y is PUSHed 
on the stack. Once the whole of 


‘W$ has been searched for all - 


occurrences of TOM then the 
search has to be repeated with 
any items that are stored on 
the stack. 

In the case of the 
information in Fig 2, the first 
occurrence of TOM is a HAS 
relationship but this doesn’t 
answer the question. The 
TOM IS entry cannot provide 
any information regarding the 
question and so it is ignored 
but the TOM IS A entry 
results in the pointer to CAT 
being PUSHed onto the stack. 
At the end of the first scan 
through the array the question 
isn’t answered but there is 
something on the stack that 


‘t —f) “— 
Fig 7 


The need to examine not only 
direct relationships but follow 
chain of relationships, TOM is 
specific kind is in general 
difficult to implement without 
using advanced techniques; 
specifically recursion. While 
recursion is possible in Super 
Basic the simplest way of 
following such chains is to use 
a stack to store all the 
intermediate findings. 

A stack is simply a 
temporary store that is used 
via two operations PUSH and 
PULL. PUSH will store an 
item of information and PULL 
will retrieve it. The order that 
information is retrieved is 
opposite to the order that it 
was stored. That is, the last 
item to be PUSHed in is the 
first item to be PULLed out. 

For this application the 
order in which items are 
retrieved is not important, the 
stack is simply used as a 
temporary store for relevant 
links that have still to be 
explored. The 
way that this 
works is best 
illustrated by 
an example of 
how the DOES 
x HAVE y 
question is 
handled. 

The question 
DOES TOM 
HAVE FUR is 
answered by 
first scanning 


z 
__ Procedure} ae : 
_9 Main program. In 
10-299 question or new data a 
init [initialisation 
Remove the next word in T$ and store it in KS 


TELL all information on x 


still has to be explored. The 
information on the stack is 
retrieved and then the array 
W$ is searched for occurrence 
of CAT HAS and CATIS A 
relationships. Fortunately in 
this case the first CAT HAS 
entry answers the question 
and no further searching is 
required. However, in 
principle any ISA 
relationships detected on the 
second search would be 
PUSHed onto the stack, so 
causing W$ to be searched yet 
again. You should be able to 
see that all that’s happening is 
that the stack is being used as 
a temporary store for further 
items that have to be searched 
for HAS relationships that 
might answer the question of 
IS A relationships that extend 
the search. 

Putting all this together 
results in the Program given 
in Listing 1. To help you 
understand the program the 
procedures are as follows 


Fig 8 
‘Description y 


: ee Bae ts Sy 
ut data and decide if it is a ; 


Push number in D on stafk 


Pull number from stack and store in D : 

i Compare W$ (P(I)) with Y$ and set A to 1 if 
; 
W$ for the word Remove lefthand character from TS 


In The Net 
The program (Listing 1) 
implements only a few of the 
ideas of a semantic net and yet 
it still behaves in an 
interesting way, as the output 
given below indicates. For 
clarity, all the input data and 
questions are shown in upper 
case and the computer’s 
responses are in lower case. 

TOM HAS A TAIL 

TOMIS A MALE 

TOM IS A CAT 

CAT HAS FUR 

FUR IS SOFT 

IS TOM A CAT 


yes 
DOES TOM HAVE A 
TAIL 


yes 
TAIL HAS STRIPES 
CATIS A ANIMAL 
IS TOM A ANIMAL 


yes : 
DOES TOM HAVE 


Listing 1 


REMark SEMANTIC NET 
WINDOW 452,236, 60,20 
MODE 8 Z 
init 
REPeat ain 
INPUT AS 
IF AS="QUIT" THEN EXIT main 
T$=A$ 
get_word 
IF K$="TELL" THEN 
tell 
ELSE 
IF K$="DOES" THEN 
does 
ELSE 
IF K$="IS" THEN 
ig 
ELSE 
X$=k$ 
add_inf 
change_point 
END IF 
END IF 
END IF 
250 END REPeat main 
299 STOP 
1000 DEFine PROCedure init 
1010 NZ=50 
1020 DIM W$(NX, 30) 
1030 DIM TX(NA) 
1040 DIM RX(NK) 
1050 DIM PX(NZ) 
1060 DIN MA(NK) 
1070 R14=0 
1080 T1t=1 
1090 $%=0 
1099 END DEFine init 
| 2000 DEFine PROCedure get_word 
2010 K$="" 
2020 REPeat space rea 
2030 IF LEN(T$)=0 OR TS(1 TO 1)¢>" ” 
THEN EXIT space_rea 
2040 check_len 
2050 END REPeat space_rea 
2060 IF LEN(T$)>0. THEN 
2070 REPeat get_char 
2080 = K$=K$ & T$(1 TO 1) 
2090 = check_len 
2100 IF LEN(T$)=0 THEN EXIT get_char 
2105 IF TS{1 TO 1)=" " THEN EXIT get 
char 
2110 END REPeat get_char 
2120 REPeat strip_space 
2130 IF LEN(T$)=0 THEN EXIT strip sp 


STRIPES 


yes 

DOES CAT HAVE 

STRIPES 

not as far as I know 
There is a great deal more that 
can be done to improve this 
program. At the simple level of 
implementation the method 
that it uses to store the names 
of relationships is very 
inefficient. The program 
should occasionally scan 
through the array W$ and 
remove multiple occurrences 
of the name of any relationship 
and adjust any relationship 
pointers in R%(TI) to point at 
the single occurrence of each 
relationship. At a more 
sophisticated level it should be 
possible to recognise different 
categories or classes of objects 
in the store. For example, 
TOM is a unique object but 
CAT is a class to which other 


ace 
2140 check_len 

2150s TF T$(1 TO 1)¢>" " THEN EXIT st 
rip_space 

2160 END REPeat strip_space 

2170 END IF 

2999 END DEFine get_word 

3000 DEFine PROCedure tell 

3010 X$="" 

3020 REPeat add word 

3030 get_word 

3040 IF LEN(T$)=0 THEN EXIT add_word 
3050 END REPeat add_word 

3060 X$=K$ 

3070 Fi=0 

3080 REPeat print_sect 

3090 FOR I=1 10 S% 

3100) sIF WS(T)=X$ THEN 

3H100 IF PA(I)<>0 THEN 

3120 FASFLtL 

3130 IF F%=1 THEN PRINT X$;" "3 
3140 PRINT WS(RE(T)) 3" "3 

3150 PRINT WS(PRIT)) 

3160 DX=PX(T) 

3170 an_stack 

3180 END IF 

3190 END IF 

3200 END FOR I 

3210 IF Fx=0 OR T1X=1 THEN EXIT print 
sect 

3220 of ¢_stack 

3230 X$=W$ (DZ) 

3240 END REPeat print_sect 

3250 IF Fi=0 THEN dont_know 

3299 END DEFine tell 

3500 DEFine PROCedure dont_know 

3510 PRINT “I DON'T KNOW ANYTHING ABOU 
T "sX$ 

3520 PRINT "PERHAPS YOU WOULD LIKE TO 
TELL ME ABOUT ";X$ 

3599 END DEFine dont_know 

4000 DEFine PROCedure does 

4010 get_word 

4015 X$=K$ 

4020 REPeat add word 

4030 IF LEN(T$)=0 THEN EXIT add word 
4040 get_word 

4050 END REPeat add_ward 

4060 Y$=K$ 

4070 K$=X$ 

4080 FL=0:AZ=0 

4090 REPeat text_int 

4100 FOR I=1 TO S% 

4110 IF WS(1)=X$ THEN 

4120 Fxet 

4130 TF WS(RA(T))=" 15 A" THEN 


objects can belong. Such 
classes can be detected by 
following IS A relationships. 
In fact the program already 
includes the array T%, which 
records the type of each item 
as accurately as it is known 
when it is entered, although 
this type of information isn’t 
used. 

T%(D = 1 means the item 
is an object 
means the item 
is a relationship 
means the item 
is a class 
means the item 
is either a class 
or an object. 
You can also introduce new 
relationships and include 
them in question processing. 
For example, TOM IS A CAT 
implies that TOM has all the 
items that CAT has but the 
reverse isn’t true. In fact the 


T%(1) = 2 
TID = 3 
TID =4 


4140 
4150 | 
4140 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 
4260 
4270 
4280 
4290 
4300 
4310 
4320 
4330 


Di=PL(1) 
on_stack 
END IF 
IF WS(RA(I))=" HAS A" THEN 
D4=PA(1) 
on_stack 
coap_with_y$ 
END IF 
IF WS(RA(I))=" HAS" THEN 
D%=PL(1) 
on_stack 
comp _with_y$ 
END IF 
END IF 
END FOR I 
REPeat pull 
IF T1%=1 THEN DZ=O:EXIT pull 
off _stack 
IF D%<>0 THEN EXIT pull 
END REPeat pull 
4340 IF DX=0 THEN EXIT text_int 
4350 X$=W$(D%) 
4360 END REPeat text int 
4370 no_inf 
4399 END DEFine does 
4400 DEFine PROCedure no_int 
4410 IF F%=0 THEN 
4420 PRINT "NO INFORMATION ON ";K$ 
4430 END IF 
4440 IF Fu=1 THEN 
4450 IF Axt=0 THEN 
4460 PRINT "NOT AS FAR AS I KNOW" 
4470 ELSE 
4480 PRINT "YES" 
4490 END IF 
4500 END IF 
4599 END DEFine no_inf 
5000 DEFine PROCedure is 
5010 get_ward 
5020 X$=K$ 
5030 REPeat sore 
5040 get_word 
5050 IF LEN(T$)=0 THEN EXIT sore 
5060 END REPeat aore 
5070 Y$=k$ 
50B0 KS=X$ 
5090 FZ=0:A%=0 
5100 REPeat isa 
Si10 FOR I=1 70 $% 
5120 IF W$(I)=X$ THEN 
5130. Fast 
5140) IF WS(RE(T))=" 1S A" THEN 
5150 DA=P4(1) 
9160 on_stack 
5170 comp_with_y$ 
5180 END IF 


new relationship that is 
necessary is 

CAT EXAMPLE IS TOM 
Given this relationship, any 
items that TOM HAS might 
also be items that CAT HAS. 
In this way you could arrange 
for the answer to DOES CAT 
HAVE STRIPES to be AT 
LEAST SOMETIMES. If other 
examples of CAT also turned 
out to have stripes then you 
might feel justified to conclude 
that CAT HAS STRIPES. 

By experimenting with the 
above program you will 
discover many ways of 
examining and reorganising 
the relationships between the 
items. There is one danger to 
be aware of while using the 
program — circular 
relationships. A relationship 
of the form TOM IS A CAT and 
CAT IS A TOM will send the 
program into an infinite loop! 


END IF 
END FOR I 
REPeat pull 
IF Tit=1 THEN Di=0rEXIT pull 
off_stack 
IF D&(>0 THEN 
X$2l$ (D1) 
EXIT pull 
END IF 
5280 END REPeat pull 
5290 IF Du#0 THEN EXIT isa 
5300 END REPeat is_a 
5310 no_int 
5399 END DEFine is 
6000 DEFine PROCedure add_in¢ 
6010 R$="" 
6020 REPeat add 
6030 get_word 
6040 IF LEN(T$)=0 THEN EXIT add 
6050 ROARE KU KS 
6060 END REPeat add 
6070 Y$=K$ 
6099 END DEFine add_int 
7000 DEFine PROCedure change_point 
7010 St=S2+1 
7020 W$(SK)=X$ 
7030 TASK) =4 
7040 W$(SK+1)=R$ 
7050 TH(S%+1)=2 
7060 W$(S%+2)=¥$ 
7070 RACK) =SH+1 
7080 P%(SX)=5%+2 
7090 Sd=G%+2 
7099 END DEFine change _point 
8000 DEFine PROCedure on stack 
8010 IF T12¢=N% THEN 
8020 ME(TIX)=D% 
8030 TIZ=T1Z+1 
8040 END IF 
8099 END DEFine on_stack 
8100 DEFine PROCedure off stack 
8110 IF T1X<>1 THEN 
8120 TAX=TL4-1 
8130 DX=NA(T12) 
8140 END IF 
8199 END DEFine off stack 
8200 DEFine PROCedure coap_with y$ 
8210 IF WS(PX(1))=¥$ THEN AL=1 
8299 END DEFine ‘coap_with_y$ 
9000 DEFine PROCedure check_len 
9010 IF LEN(T$)<2 THEN 
9020 T$="* 
9030 ELSE 
9040 T$=T$(2 TO LEN(T$)) 
9050 END IF 
9099 END DEFine check len 


5190 
5200 
5210 
5220 
5230 
5240 
5250 
5260 
5270 
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MIRACLE SYSTEMS 


— 14 day money back guarantee on all products — 
- 12 month warranty on all products — 
QL CENTRONICS PRINTER INTERFACE £29.95 


* Complete unit including 3 metre cable 
* Plugs into either SER] or SER2 


QL SERIAL CABLE ..........cccccccssssssseccsseessseeeesens £7.50 
* 3 metre cable 
QL JOYSTICK ADAPTOR .....cccscccccsssssseeseess » £4.99 


* Lets Atari/Commodore/Spectrum joysticks plug into 
CTL ports 
QL SCREEN DUMIP. .......cccccssssssssssscceseseereeseees £4.99 
* Copies whole or part of screen io Epson compatible 
printer 
QL DOUBLE EXPANDER. ........cccsesscsssssseeee £39.00 
* Connects both RAM and DISK to QL 
(Not necessary for MIRACLE EXPANDERAM) 


QL MODAPTOR ..wcccccccssccsssccceceesensesseeeseess £39.00 
* Links QL to 300/300, 1200/75, 1200/1200 modem 
OL MOUSE witisicsshsciccasecdinnsscsvesesaaseecteass (Please call) 
QL EXPANDERAM 256.......cssssscsssssessssseeesees £95.00 
* 256K RAM with through connector for DISK I/F 
QL EXPANDERAM 512......ccsssssssssecesssseesens £125.00 
* 512K RAM with through connector for DISK I/F 
MIRACLE SYSTEMS LTD Please send CWO. 
AVONDALE WORKSHOPS Access orders welcomed. 
WOODLAND WAY Send SAE for catalogue. 
Laseceine peg SINCLAIR and QL are trad 
BRISTOL basa nie adhere 

ks of Sinclair R h Ltd 
BS15 1QL Tel: (0272) 603871 Ext 210 


PUT 


TALENT 
ON YOUR OL 


CARTRIDGE DOCTOR 


QL POOLSWINNER 


THE ULTIMATE POOLS PREDICTOR 


* MASSIVE DATABASE Poolswinner is a sophisti- 
cated pools prediction aid. It comes complete with a 
large database — 25000 matches over 12 years. All 
English and Scottish team.names are in the database. 


* PREDICTS Not just score draws, but no-scores as 
well. 


* SUCCESSFDUL We guarantee that poolswinner 
performs considerably better than chance. 


* EASE Rather than having to type in each team 
name, which can be up to 16 characters long you 
simply type in up to 3 figures and the teams are dis- 
played on your screen. 


* UNIQUE The precise prediction formulae calcu- 
lates the actual efficiency of every team as the results 
come in and with speed. As far as we know there isn’t 
another pools predicting program that uses this 
method. 


(SUPPLIED ON MICRODRIVE CARTRIDGE) 


ONLY £14.99 ail inctusive) 


Cheques/P.O’s payable to: 


TECHSOFT 


33 High Street, South Hiendley, Barnsley, 
South Yorkshire S72 9AE 


24 hours delivery service 


THE LOST KINGDOM OF ZKUL 
WEST (text adventures) 


Explore the ancient dwelling place of Dwarves — or pit your wits and 
reflexes against a gang of robbers in a Western ghost town. These 
challenging text adventures are stimulating, addictive — and highly 
enjoyable. 


“WEST will please not: only adventure addicts but anyone who ever frowned 


into a puzzle of any sort’ QL USER 
The Cy of the game is superb — this is the standard the others have to 
bea MICRO ADVENTURER on ZKUL 


rabbi from selected branches of W H Smiths or direct from TALENT 


each 
(Please add 50p 
postage and packing) 


Your datais worth a lotto you. Source programs, text, scientific information, 
records, all represent hours of time and effort. The CARTRIDGE DOCTOR will, COSMOS 
in most cases enable you to: 

: by G F Cornwell 


@ Recover files from damaged or suspect cartridges, even files 
inaccessible to BASIC Identify over 500 stars and planets with this impressive astronomy 
program. COSMOS displays your choice of star maps for any date and 
time and for any part of the worid. 


View the solar system, the moons of Jupiter, the rings of Saturn — 
even Halley's Comet. Call up comprehensive information on any 


@ Recover newly-deleted files 
@ Recover files with lost or damaged blocks (in BASIC, QUILL etc.) 
cf aaa i eal visible object in the sky. Menu-driven, easy to use — a fascinating 


The CARTRIDGE DOCTOR is easy to use. It incorporates a powerful rule-based addition to your QL software library. 
expert system which can make sensible decisions andautomatemuchofthe available direct from TALENT 

labour needed to recover lost data. An extensive set of tools is also provided (Please add 50p 

for the informed user. Full instructions are included. postage and packing) 


Available from selected branches of W H Smiths and Boots 
or direct from TALENT. 


AA Se 


CURRAN BUILDING, 101 ST JAMES ROAD, 
postage and packing) | YF NU 24 Hour Credit Card Hot-Line 041-552 2128 
COMPUTER SYSTEMS SOFTWARE FROM SCOTLAND 
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Microdrive Storage Box 


e Fully interlocking e Holds 20 cartridges + index cards 
@ MICISHIVE BORG fri aie ve ce em alewlsod ames 94.95 


e Microdrive Box + 10 blank cartridges .. £22.45 
e Microdrive Box + 20 blank cartridges. . $39.95 
Blank cartridges ... £1.95 . 


© BlONk CGIHIAGES 20d isto c's eee ame 

® Ql DustCovers .........4,..... Pen 0(0) = 
@ Spectrum Monochrome Monitor Connector... £11.50 fame} 

e Spectrum RGB Interface .............. £45.00 : 


Disc Storage Boxes 
e 3%2" Disc Storage Box Holds 25 discs....... 


| e 5%" Disc Storage Box Holds 50 discs...... $13.90 

e @ BOOS" S7SIGISCS i ooo econ vncdheantns ce 
© BOCTIO SVAS/SGISCSS ow. os ict. chet hangs 

Available from W.H, Smiths, e Storage Box (holds 30 3%” discs or 20 3” discs)... . £13.25 


John Menzies & Spectrum Stores. 


TRANSFORM LTD. (DeptQl ) O89 283 4783 


_ Lucks Lane, Paddock Wood, Kent TNI2 6QL 


The Great Little 80 column Printer 


from Viglenqta price everyone 


How to order by post - Simply fill in the 
coupon with your requirements. Enclose your 
Cheque/P.O. or use your Access/Barclaycard. 
Please make cheques payable to VIGLEN 
COMPUTER SUPPLIES and post to the address 
shown left. Allow seven days for delivery, add 
£8.00 carriage, packing and ins. on all items. 
By telephone - Ring (041) 843 9903. Credit 
Card holders (Access/Barclaycard only) can 
#1 Purchase by telephone. Please give Card 
No., Name, Address and iterns required. 


Credit cards valid if signed by 

card holder. Address on coupon EN 
must be same as card holder. : 
Se SE GE EE 2S 2 & Es 


Please send me (state quantity) 
SLP printers) 


(INCLUDING VAT) 


with interface cable 


@ All printers come standard with 
both serial and parallel interface 


Made in Japan 


@ 12cps near letter quality mode at time of Pes 9 a : Elin ees Foe er aes os De ee ; 
— Offers subject to availability add £8.00 camage 
@ Normal 50cps draft printing i i 
' | 
® Tractor and friction feed as Post to: | Sa a ey i ea eine | 
standard Viglen Computer CAINE «cdo d two raha cent sderdcs tks 
Uses normal A4 sheet paper or Supplies PSCMESS irra Basen A aonlticn, orate Bani te 2 eo 
continuous stationery Unit 7, Trumpers Way , 
B® Original plus 2 copies Hanwell, W7 2QA 00 Pees 
B® Bidirectional logic seekin Tol: 01-643 9903 gee oo 
" 9 g Showroom /factory open I | prefer to pay by ACCESS/BARCLAYCARD 
@ 48 International characters Monday - Friday 9.30-5.30 i (delete whichever is not applicable) i 
@ Subscripts, superscripts and Saturday 9.30 — 4.00 COMA NO ooo ccccccccceccce ec ee ccc 
SIE. THE BEST PARTNERS _ | ] 


FOR YOUR COMPUTERS 


Also available for IBM. SIQMGMISS asi = 5268's < deten aelten a Bdoned d Pixies dendboa « 


eee TY 
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i. 
\ 
7M \tem Price 


Free blank cartridge 
with every title purchased 
Prices inc. VAT & next day delivery 


CI uo TEU teste eee 


Improved Software & 5 free games 


Q-CALL 


Q-CONNECT. 
FREE PRESTEL SUBSCRIPTION 


£179 


4 Systems, 68 Foxwood Close, 
Feltham, Middlesex TW13 7DL 


= 
Total 


Tandata 
COMPLETE 


01-844 1399 


68 FOXWOOD CLOSE. FELTHAM, MIDDLESEX TW13 7DL TEL 01844 1399 


The optimum. partner for business & 


Now, you can buil 
a OL system with 
Si1ciair peripherals 


fon 4 = 


BUILT IN TRACTOR FEED AND 
AUTO PAPER FEED 


sinclair 


Vision 


personal use. 100 cps (draft)/20 cps (NLQ). 
Newtechnology Letter Quality, QL matching 
with RS232 interface & cable. 


D, Density Disk Interface £1 10 
D/Drive 1 3.5"+PSU £175 


Dual 2X720K 3.5” with 


Interface, Power & Software. 
| KO st 
NOW buy a We HP. 


CARTRIDGE TIDY a 


oe” 
we 


and you're a free! member of 


CARTRIDGE 
CADDY SYSTEM 


What Cartridge Caddy 


membership offers you 
GUARANTEED STOCKS 


Microdrive cartridges 
at £1.50 


delivered to your door! within 24 hours 


SPECIAL 
10 Cartridges 
in Tidy box 


£21.90 
£36.90 20 Cartridges in Tidy box 


wk keke kK KK KT 


Add 10p (p&p) each: 


LANGUAGES 
METACOMCO ASSEMBLI 
METACOMCO BCPL ....... 
METACOMCO LISP ... 
METACOMCO PASCAL .. 
MONITOR DISSEMBLER 
QL TOOLKIT 


OU} CASH TRADER .......0enessenmsanse 
DECISION MAKER .. 
PROJECT PLAN 
ENTREPRENEU! 
QLHOME FINAN 
TYPING TUTOR... 
EIDERSOFT ARCHIVER ...ssssscsne £1 
INTEGRATED ACCOUNTS... 


Quazimodo @ £12 

Space Paranoids @ £12 

Night Nurse @ £12 

Galactic Invaders/Star Guard @ £14 


(| QL-CAVERN ......sesrnse 
MICRODEAL HOPPER ..... 
MICRODEAL CUTHBERT 
PSION MATCH POINT ... 
HYPODRIVE sisaiscscssansssncassnrspas 
MICRODEAL LANDS OF HAVOC 
PSION CHESS .. 

TALENT WEST 
TALENT ZKUL . 


Cartridges 
are available at a new 
low price of £1.50 inc 
VAT OL SUPER BACKGAMMON .. 

EIDERSOFT ZAPPER 
EIDERSOFT OLART .. 
COSMO rns 
AREA RADAR CONTROLLER 


No body gives vor DJL. more than 4Systems* * * * * * ** 


Sinclair, QL are Registered Trade Marks of Sinclair Research Limited 


Backing up last month’s 


feature on transferring 


Spectrum programs onto the 
QL’s microdrives, Marcus 
Jeffery examines some of the 
differences between 
Spectrum BASIC and QL 


SuperBasic. 


With the dramatic price drop 
of the QL recently, the 
machine is now a far more 
attractive proposition. To 
many people, looking for a new 
micro this Christmas, it will 
be viewed as a logical upgrade 
from the Spectrum, much as 
the Spectrum was the ‘next 
step’ from the ZX81. However, 
the present lack of software 
available for the QL is likely to 
entice many people into 
converting software from their 
old machine — not an easy 
task when you consider the 
vast differences between 
Spectrum BASIC and QL 
SuperBasic. 

Fortunately, with 
SuperBasic being far more 
versatile than its predecessor, 
we can convert large chunks of 
code with remarkable ease. 
For instance, Table 1 shows the 
mathematical functions 
available on the Spectrum, 


DEFine FuNction SGN(x) 
IF x > 0 THEN 
RETurn +1 
IF x <0 THEN 
RETurn -1 
RETurn 0 

END DEFine SGN 
From now on, the function 
SGN can be used on the QL in 
the same way as all the other 
functions, with the syntax 
SGN(x). One thing to be 
careful of when converting 
mathematical functions to the 
QL is where to put the 
brackets which are used in 
SuperBasic. If we take the 
following line in Spectrum 
BASIC: 

PRINT ABS 5-9 
You would probably expect the 
value four, because five minus 
nine equals four, and the 
absolute value of this is four. 
However, due to operator 
priority, the ‘ABS 5’ is 
executed before the 
subtraction, giving the final 
result minus four. 

Having considered the 
numeric functions, let’s look at 
strings (Table 2). On the whole, 
the Spectrum and the QL are 
very similar, both using string 
slicing, the same type of 
dimensioning and so on. 
Nevertheless, there are a few 


| important differences in 


string use. For instance, try 
the following on the Spectrum: 


MATHEMATICAL FUNCTIONS 


SIN(x) 
SQRT (x) 
TAN(x) 


and their SuperBasic 
equivalents. As you can see, 
the only function lacking on 


the QL is SGN, which returns | 


—1 for negative arguments, +1 
for positive arguments, or zero 
for zero arguments. Here 
again, due to the flexibility of 
the QL, all you need to do is 
add the following lines to your 
program: 


CHR (x) 
CODE (x$) 


Table 2. Functions to permit string handling. 


u—___ 


SPECTRUM FORMAT| QL FORMAT 


Returns Absolute Value 
Returns Arccosine 
Returns Arcsine 

Returns Arctangent 
Returns Cosine 

Returns Exponent 
Returns Integer 

Returns Common Logarithm 
Gives value of Pi 

Returns Sign as —1,0 or 1 
Returns Sine 

Returns Square-root 
Returns Tangent 


Table. 1 Trigonometric and other maths functions. 


DIM a$(10,20) 

PRINT ‘“‘*”;a$(4) 

(6 TO 9);““*” 

PRINT 66899, G(5) 3608? 
When initially dimensioned, 
the Spectrum fills string 
arrays with spaces, so you'll 
get the output: 

*{4 spaces}* 

*{20 spaces}* 

Now, if you try the same thing 


Returns ASCII character 
Returns ASCII integer 
Returns length of x% 
Converts x to string 
Converts x$ to numeric 
Strips a level of string quotes 


BASIC DIFFERENCES 


on the QL, you'll get the 
output: 


*(4 x CHR$(255)}* 
Ed 


These differences occur 
because the QL doesn’t define 
the strings to contain spaces. 
The easy method of avoiding 
this is to fill all QL strings 
with spaces when they are 
first needed. You can do this 
using FILL$, choosing a large 
repetition number, such as: 


DIM a§$(20) 
a$ = FILL$(“ ”’,100) 
The QL has no need for the 


x AND y 
NOT x 
x OR y 


x AND y 
NOT x 
x OR y 


Table 3. The logical operators AND, NOT and OR. 


functions STR$ and VAL, due 
to its use of coercion. If you 
want to perform the following 
Spectrum command: 

LET a$ = STR$(1.234) 
then simply assign the 
number to a string variable: 

a$ = 1.234 
The QL’s coercion will take 
care of the rest. The VAL 
function is similarly handled 
by assigning a string number 
to a numeric variable. One 
other difference is that the QL 


DEF FN x () = expression 


RETurn expression 
END DEFine x 


FOR..TO..STEP 
statements 
EXT END FOR 


x() 
GOSUB line 


FN x () 
GO SUB line 


GO TO line 
IF..THEN..ELSE 


GOTO line 
IF..THEN..ELSE 


ELSE statements 
ENDIF 


RETURN 


RETurn 


STOP STOP 


Table 4. Looping and other program flow commands. 


uses & to concatenate strings, 
whereas the Spectrum uses +. 
The reason for using & is to 
avoid confusion when coercing 
results. For instance, on a 
Spectrum: 


LET a = VAL “1.234” + 5 


would give the result 6.234, 
because the VAL converts its 
immediate argument, then 
adds the five. On the QL: 

a = “1.2347 +5 
would give the correct result, 
but: 

a = “1.234” &5 
would give ‘1.2345’. The & 
induces the QL to coerce the 
five to astring and concatenate 
the two strings before coercing 
back to a numeric value! 

Finally, if anybody can ever 
find a use for VAL$ then ’m 


LOGICAL OPERATORS 


| Sinclair have seen fit to leave 
| these commands in the syntax 


| BASICs. As shown in Table 4, 


CONTROL STRUCTURES 
SPECTRUM FORWAT OL FORMAT 


DE Fine FuNction x () 


FOR..TO..STEP statements 
or FOR..TO..STEP statements 


or IF..THEN statements 


| Spectrum could have such 
| linesas LOAD “’ CODE to load 


| code. Using QL microdrives 


| name. Another little anomaly 
| is the RESTORE statement. 


sure they can also write a QL 
function to emulate it. This is 
simply a matter of removing 
one level of inverted commas 
from a string, then returning a 
string. 

Both the Spectrum and the 
QL use the non-zero values for 
true and zero for false, so there 
shouldn’t be too much trouble 
converting these (Table 3). 
Things should work even with 
the more complex use of the 
logical relations, such as: 

LET a=b+(c>d)+ex 

(f<=g) 

The only problem you may 
come across is if you havea 
program containing 
something like: 

PRINT 13 AND 7 
If you perform a logical AND 


Return TRUE if x AND y is true 
Return opposite of x 
Return TRUE if x OR y is true 


of the bits you’ll get the 
answer five, the Spectrum will 
print thirteen, and the QL will 
print one. 

When using the Pascal-like 
SuperBasic language, the 
advanced control structures 
make such commands as GO 
TO and GO SUB redundant. 
Fortunately, however, 


for compatibility with other 


Single-line function definition 


Loop repitition control 


Call function 


Call subroutine 


Go to line number 
Condition control 


Return from GOSUB call 


Stop program execution 


many of the control structures 
have a slightly different 
layout, but conversion from 
the Spectrum is still relatively 
simple. In all cases, the QL 
contains the more advanced 
structures, which can easily 
accommodate the elementary 
Spectrum features. 

Moving on, Table 5 shows the 
data and file handling 
commands. Again, conversion 
is relatively straightforward. 
Bear in mind that the 


e| 


some byte data or machine 


you'll have to change this to 
LBYTES and specify the file 


On the Spectrum, the data 
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DATA AND FILE HANDLING 


DATA data list 

DIM array list 

LOAD filename 

LOAD filename CODE 
start, length 

MERGE filename 

READ variable(s) 

RESTORE line 

SAVE filename 


DATA data list 
DIM array list 
LOAD dev-filename 


start 
READ variable(s) 


RESTORE line 
SAVE dev-filename 


SAVE filename CODE |SBYTES dev-filename 


start, length start, length 


LBYTES dev-filename 


MERGE dev-filename 


List data for use by READ 
Dimension vectors and arrays 
Load a BASIC program 

Load a data file 


Combine/Load program 
Read a DATA item 
Restore DATA pointer 
Save a BASIC program 
Save a data file 


Table 5. SAVEing, LOADing and other file commands. 


pointer is automatically 
restored to the beginning of a 
program as it is run. So, with 
the following program: 


10 READa 

20 PRINT a 

30 STOP 

40 DATA 1,2,3,4 
the digit ‘1’ will be printed, 
however many times you may 
run it. If you try the same 
program on the QL, you'll get 
the answers ‘1’, then ‘2’, and so 
on. To be safe, when using 
READ and DATA, always 
include a RESTORE 
statement at the beginning of 
the program. 


something like: 


OPEN #4,serl 
PRINT#4,“‘Printer 
output” 


Finally in this section, the QL 
has no equivalent to the 
Spectrum’s INVERSE 
command. The way around 
this is to remember the 
current PAPER colour and 
INK colour, and swap them for 
the duration of the inverse 
printing. 

Table 7 shows the few 
remaining miscellaneous 
commands. Both micros have 
a BEEP command, but the 


1 QL’s is far more sophisticated 


SIMPLE INPUT/OUTPUT 
SPECTRUM FORWAT 


*AT line, column AT line, column 
cLS CLS [channel } 
COPY _— 
*FLASH 0 or 1 
*INK colour 
INKEY$ 
INPUT string, vars(s) 
*INVERSE 0 or 1 
LPRINT expression 
*OVER O or 1 
*PAPER colour 
PRINT expression 
‘TAB column 


INK [channel ] colour 
INKEY$ 

INPUT string, var(s) 
Swap INK/PAPER 
Use PRINT channel 
OVER Oorl 


TO column 


FLASH [channel] 0 or 1 


PAPER [channel] colour 
PRINT [channel] expression 


Set print position 
Clear screen to current paper 
Copy screen to printer 
Turn flashing off or on 
Print in specified colour 
Check keyboard for key press 
Input data from keyboard 
Print in inverse colours 
Print the information to the printer 
Turn overwriting off/on 
Print on specified colour 
Print the information to the screen 
Tabulate output (This is 
embedded in PRINT/INPUT 
statements on Spectrum and the QL 


* On the Spectrum, these commands will be found embedded in statements, 
such as PRINT, LPRINT, INPUT, PLOT, DRAW, and CIRCLE. On the QL, 
they should be separate statements prior to these commands. 


Table 6. Basic 1/0 and screen commands. 


Input and output of 
information are obviously 
very important in any 
program. Some of this will be 
based on screen graphic 
layout, and as such is bound to 
be very different from one 
machine to another. Before 
considering these, table 6 
shows some of the simpler 
Input/Output commands. The 
Spectrum has eight colours (as 
has the QL in MODE 8/256) 
and, whilst printing, these can 
-be changed in much the same 
way as on the QL. The 
Spectrum COPY command 
sends the appropriate bit 
patterns of each screen byte to 
a ZX printer, thus allowing 
you to copy any screen. On the 
QL, with its possible range of 
printers, this would be very 
difficult to write. However, if 
all you want is text, then it’s 
easy enough to set up a printer 
channel and reprint the 
screen. If you write procedures 
to perform the printing within 
the program, you could then 
call it using different channel 
parameters. Setting up a 
printer channel is also the way 
to simulate LPRINT, using 
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(though it’s dubious whether it 
sounds any better!). The USR 
command is for the Spectrum’s 
User-Defined Graphic 
characters. These can be any 
of the graphics letters ‘a’ to ‘u’. 
It’s not too difficult to obtain 
user-defined graphics on the 
QL, just by reserving an area 
of memory (using RESPR), 
then POKEing the appropriate 
bytes to use, say, codes 128 
onwards. 

Unfortunately, the QL’s 
character sizes are not the 
same as those on the Spectrum, 
being narrower and taller, 
requiring nine bytes each. 
This makes any simulation of 
character graphics extremely 
difficult, and best avoided. The 
other commands in this table 
deal mainly with byte 
memory. If you’ve chosen a 
Spectrum program which uses 


PEEKs and POKHs, probably 
for machine code or directly 
accessing the display and 
attribute files,then you deserve 
all you get. Try to pick a 
program making more normal 
use of Spectrum BASIC. 

We now start coming across 
the main problems when 
converting software. The 
layout of the Spectrum screen 
(Fig 1) is organised in two files. 
The first is a simple bit 
mapped on/off display file. The 


(255, 
32 Chars———___—»y i 


Figure 1. Spectrum screen layout. 
horizontal axis has 32 bytes 
(256 pixels) and the vertical 
axis has 24 character lines 
(192 pixels), using 6144 bytes. 
In addition to this there is a 
separate ‘Attribute’ screen 
which has just one byte per 
character square. Each byte 


This also gives a small 
BORDER which can be 
changed in response to the 
Spectrum’s BORDER 
command. One feature of this 
command is that it also 


changes the PAPER colour of 


channel zero (input area). 
Therefore, you could easily 
redefine channel zero on the 
QL to fit over the border of 
channel one, without spoiling 
the screen effect. 

The next problem is to alter 
the QL’s graphics scale, to 
emulate the Spectrum’s 
horizontal (256) and vertical 
(176) axis. The QL vertical 
scale begins at 100, and the 
first parameter of the scale 
command can change this to 
176 — measured from the top 
left-hand corner of Window 
Zero (if you’ve defined this). 
Unfortunately, this does not 
give the correct horizontal 
distance, and the SCALE 
command will not allow us to 
define values for both axes. 
You could mess about for 
hours trying to improve these 
coordinate values, and never 


SPECTRUM FORMAT QL FORMAT 


ATTR line,column 
BORDER colour 


BRIGHT 0,1 or 8 
CIRCLE x,y,radius 
DRAW dx,dy 
PLOT x,y 

POINT x,y 


width, colour 


CIRCLE x,y,radius 
LINE-R TO dx,dy 
POINT x,y 


BORDER [channel ] 


Returns attribute value of character square 
Set colour of screen border 


Set character brightness 

Draws a circle at x,y 

Draw line dx,dy (relative to present cursor) 
Plot point x.y 

Return 0/1 for paper/ink 


Table 8. Commands for graphics manipulation. 


contains the information for 
the PAPER colour (0 to 7), the 
INK colour (0 to 7), the 
BRIGHTness (on/off) and 
FLASHing (on/off). Then, just 
to make things a little more 
complicated still, the screen is 
split into two areas (like 
windows on the QL). Window 
one (Output) covers the 
topmost 22 lines, and is used 
for listing and printing, whilst 
the bottom two lines (window 
zero) are used for input, error 
messages, and so on. What’s 
more, the graphics coordinates 
start from the bottom-left of 
the output window only, 
giving a range of (0,0) to 
(255,175). 

Now the QL is flexible 
enough to emulate (to a 
degree) the Spectrum screen 
layout. Use MODE 8 to give 
the eight required colours, and 
try the following values to give 
the 32 column display: 

WINDOW #1,416,256,48,0 

CSIZE#1,2,0 {Default} 


OTHER COMMANDS 


SPECTRUM FORMAT QL FORMAT 


BEEP dur,pitch BEEP dur,pitch.... 
BIN string of eight bits ae 
CLEAR location 

LET var = expression 


(RESPR) 
LET var = expression 


PAUSE 1/50 sec. 
PEEK loc,vaiue 
POKE loc,vatue 
RANDOMIZE seed 
REM comment 
RND RND 


PAUSE 1/50 sec. 
PEEK loc,value 
POKE loc,value 
RANDOMIZE seed 
REMark comment 


USR character 


ber 


Returns address of User Defined Graphic 


Table 7. Miscellaneous Spectrum/QL commands. 


get particularly close to the 
Spectrum. By far the best 
method of handling this is to 
choose the position for a 32 
column, 24 line display which 
suits your television or 
monitor, set the vertical scale 
for 176 coordinates, then 
divide the distance along the 
horizontal axis by 256. Now, 
when converting the program, 
multiply all the X-axis values 
by this amount. 

We're not suggesting that 
this is all the information 
you'll need to go away and 
convert all your Spectrum 
programs. To do that properly, 
you really need to be familiar 
with both machines. For 
instance, it is unlikely that 
you'll be able to find any 
interesting Spectrum software 
which doesn’t use user-defined 
graphics, Z80 machine code, 
direct screen addressing, 
system variables and the like. 
Just as QL software takes 


| advantage of the QLs features, 


such as easily changed 
character sizes, windows, and 
so on. However, if you pick 
some of the simpler software, 
this information should at 
least guide you past the 
majority of pitfalls, and avoid 
some of those dreary error- 
searching hours. 


Illustrating 
Super-Basic on 
the Sinclair QL 


by DONALD ALCOCK... 


... introduces you to 
Super-Basic on this 
popular machine. 
Packed with 
examples and in the 
same unique style as 
the author’s previous 
books, it explains 
and illustrates useful 
programming 
techniques, 
including graphics, 
state tables, list 
processing, sorting 
and recursion. The 
ideal companion to 
the Sinclair QL, this 
book is both a complete guide to the facilities 
available on this machine, and a clear reference 
manual for Super-Basic. Comb-bound £5.95 net 


Ma Cambridge University Press 


The Edinburgh Building, Shaftesbury Road, Cambridge CB2 2RU, England 


100% Machine Code. 
_ * Detailed Graphics. 
_ Selectable Skill Level. 
* For the Executive and The Family. 
|p to 40 Squadrons. 
Challenging and Addictive. 
* Player Assessment. 


MEDIC DATASYSTEMS 
DISK DRIVES 


At last, the definitive QL expansion system has 
arrived:. , 


EXTRA RAM 1 DISK DRIVE 2 DISK DRIVES 
_ £249 £399 
256K £359 £509 
512K £449 £595 


The above systems use 3.5” 720K Mitsubishi 
drives, include parallel printer interface, RAM 
disk and the following FREE software: M-DESK, 
M-BASE, M-ACCOUNTS, M-KEY, M-SQUEEZE, 
M-SPELL, M-MERGE, M-BOOT, M-TRANSFER, 
M-COPY. 


We sell a wide range of other products for the QL 
at equally competitive prices. Just write or 
telephone for details. 


PRICES INCLUDE VAT AND DELIVERY 
EXPORT ORDERS WELCOME (NO VAT) 


NMMEWALL ie 


QL12 


SQUADRONS: 


es 
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For all BBC B and QL micro users, 
the Cumana UPGRADE offers 
the chance to step into a truly 
professional environment. 


Powered by the UNIX-like, high 
performance OS-9 operating 
system, the UPGRADE is easily 
installed with no soldering or 
wiring required. With a single 
keyboard command, the user 
changes from standard mode to 
UPGRADE mode; the result is 
multi-tasking, real-time, true 
minicomputer performance! 


The Cumana UPGRADE 
available only from Cumana:- 


OS-9 and Basic 09 
are trademarks of Microware & Motorola 
UNIX is a trademark of Bell Laboratories. 
Sculptor is a trademark of MPD. 

BBC is a trademark of Acorn. 

Sinclair QL is a trademark of Sinclair Research Ltd 
MS-DOS is a trademark of Microsoft. 


@ RAM expansion of 512 Kbytes 
standard 

@ Double density floppy disk 
controller 

@ Winchester disk interface for 
high storage capability 

@ Full multi-tasking in true 
real-time 

@ UNIX software compatibility 

@ Powerful graphics kernel 

@ Dynacalc — powerful electronic 
spreadsheet 

@ Stylograph with Mailmerge & 
Spell Check (versatile word 
processor) 

@ Sculptor — Database/Software 
development system 

@ Basic09 — Basic compiler 

® Compilers for C and Pascal — 
professional quality compilers 

@ Assembler 


“The Cumana UPGRADE — 
more performance, 

: more payoff in your 
existing 
investment.” 


Cumana Ltd., Pines Trading Estate, Broad Street, 
Guildford, Surrey, England, GU3 3BH. 
Tel: Guildford (0483) 571666. Telex: 859380, QL12 


PRESENTED 
FREE WITH 


QL BARGAINS 


* ALL PRICES INCLUDE VAT AND NEXT DAY DELIVERY BY SECURICOR «x 
* OR FIRST CLASS POST x 
CALL 0267 231246 FOR PERSONAL ASSISTANCE 


FULLY TESTED QL VERSION 3 SOFTWARE £199 


PRINTER PRICES INCLUDE MIRACLE SYSTEM INTERFACE * & & & EIDERSOFT ICE ROM — JUST £46 & & & & 


MANNESMANN TALLY MT80-+- ........cssessessessesssssessessessesssessesscssssecsscsseseeseess £219 

SEIKOSHA SP1000A (Friction Tractor and NLQ) ........cc.scscsessssssesssessessesseeee £239 ACCESSORIES 

EPSON EXBU sccsoecencacsevoteosescsccasssvesecsavectscstccsseetcccxctvenstessinsosbershernnsnsivetnecice 4: MICTOGNVG COrtbld GOS si csscssssussssvscossvencseusnccusesvvesssessressssivasigunanenine 
EPSON LX80 WITH TRACTOR FEED ..........ssssssssssescsssssssecssecssseessesssecssseasseene £286 10 Cartridges with Transform Box 

TUKAINSISE SLO, seedetvs dascdvcevestocesevasvtosucer nessa eswviisorwnsie ists erreconnsurcatene tence £299 10 DS/DD 5.25” Disks ...........ssseeees 


TTERRANT RPS OD sce secs dec t Fcc cv ent et svansebenronssennnstaonvevssonsnasvavessoaesucsbouauaveety £419 10 DS/DD 3.25” Disks 
QUEN DATA: DAISY WHEEL. scissssosesesscsttvssacscuseessttssrsaavseasonsiseteccestcaceccreeseatoes £289 RIBBONS 
Miracle Systems Parallel Interface ............:csssssssssssessessesseesesseesessessesseseeseess £29 Brother M1009 
SOTA CADIS: sizsvssccavsesusuvenacivowayeesceccshsasesomeesaswesseceeeaxesncvousciwanaconcounpussstdoccene £10 MT80 or Shinwa 
2000 Sheets Fanfold Paper (Supplied with printer) oc. £16 Quen Data 


* * BUDGET RAM & DISK UPGRADES x x 


CUMANA DISK INTERFACE ONLY£79 512KEXPANDER RAM ONLY £119 
CUMANA DUAL 312” DRIVES + CUMANA INTERFACE ONLY £269 
FULL RAM + DISK DRIVE UPGRADE ONLY £379 


* BRIGHT STAR MODEMS ONLY £199 x 


INCLUDES AUTO ANSWER/DIAL 
PCML DISK INTERFACE WITH 260K RAM & ROM £249 
PCML DISK INTERFACE WITH CUMANA DUAL DRIVE £439 


LANGUAGES BUSINESS MONITORS (CABLES INCLUDED) ; 
METACOMCO ASSEMBLER ......... £29 TRSYSTEMS PAYROLL .............. £63 Microvitec Cub 1451/DQ3 COlOUT ............ssssssssssssesessssseecessssesesssssessssevecseese £254 
METACOMCO BCPL .............--+++ 49 = DECISION MAKER ............--.:--s £35 Microvitec Cub 1451/DQT3 with Swivel Stand .........cecssssssecssssesecsssesessssenes £274 


METACOMCO LISP ......... PROJECT PLANNER ... SWIVEL Stand TOF MICKOVIOG *scctsenscaveecosvesarccssadscts Matevecersnavtejsuastasstecdotseestececs £25 
METACOMCO PASCAL .... ENTREPENEUR ..........c:ccsccccsesseees £35 Philips V7001 18MHz Green (RECOMMENDED FOR THE QL) ......0.........0ese-. £92 
METACOMCO ‘C’ ........c.ceceseseesees £8 QL HOME FINANCE (BUZZ) ......... £22 Swivel Stand for Philips MOMtOr ...........sccssssssssesssessssecsussssessseescuessseesseeesssees £23 
DIGITAL BASIC COMPILER TYPING TUTOR .......c.ccessesesseeeeees £20 
DIGITAL FORTH + REVERS! ....... £26 EIDERSOFT ARCHIVER ................ £17 3250 WATT MAINS FILTER .sccsssscsssssssssssssssesarsesossssnsousecsusassusarsuss er £36 
DIGITAL SUPER MONITOR .......... £13 —EIDERSOFT QSPELL (CARI) ........ £20 * Provides four protected mains sockets with plug. 
TALENT CARTRIDGE DOCTOR ..... £13 EIDERSOFT QSPELL (DISK) ......... £23 * Avoid crashes and damage to the QL’s components 

%* 30db suppression 1MHz to 30MHz 
LEISURE %* 130 joules spike suppression 
TALENT ZKUL MICRODEAL HOPPER ................. £12 
TALENT WEST MICRODEAL CUTHBERT/SPACE .. £12 CERT OONE es assccssissiatsicciesinnca ve cnteadensetanseaturigsocsassderasin ee oceans £39 
TALENT GRAPHIQL MICRODEAL CRAZY PAINTER ..... £11 %* Link your QL to any modem with an RS232C socket 
EIDERSOFT ZAPPER MICRODEAL FLIGHT SIMULATOR £16 * — Prestel and Bulletin Board software included 
QL SPRITE GENERATOR MICRODEAL LANDS OF HAVOC .. £16 
QL SUPERBACKGAMMON ........... TZ © QLIGAVERN cs ssisssvesnctecretiavesvactix £12 QUICKSHOT Il JOYSTICK WITH ADAPTOR .s.csscssssscscessssesssssssesseesersusseses £14 
PSION GHESS sisssssecssssciscssccaves £17) = MATCH POINT ........ £13 QL JOYSTICK ADAPTOR ..cssscscscssesssssssssseracesssessersecesusurareess ee et | 


HYPODRIVE: cssccsvevesssvncinsvereperssass £13 
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Archive is probably the most 
difficult of the four Psion 
packages to really come to grips 
with, or at least it appears so, 
especially if you try to understand 
everything in the User Guide all at 
once. On the other hand it is a 
powerful package and probably 
more than any of the others, 
realises the potential of using a 
micro to replace a manual 
procedure. The purpose of this 


* article is to give you some 


additional help and ideas, firstly 
on how to get started, and then 
on how to translate your 


_ particular application into an 

_ Archive database — whether its 

: for high-powered scientific 

. research or just keeping track of 


your record and tape collection. 


. If you’ve already made a start 


with Archive the next section will 
just be revision before getting 
down to applications. 

Archive is a tool for organising 
information — storing it, retrieving 


| it, sorting it, searching through it 


and generally managing it. The 
analogy to a card-index system 


| isagood one since information is 


stored on records (like the cards 
in amanual system) and the 
records are collected together in 
a file (like the card-index box). On 
each record there are a number 
of fields (like the spaces on each 
card) which are used to contain 
the information relevant to the 
particular item (or person) 
referred to by that record. Fields 
have a type which indicates 
whether the field is for textual or 
numeric information. The great 
advantage of using Archive 


‘instead of amanual card-index is 
‘that the laborious sorting and 

! searching jobs are carried out 
‘automatically. When you add a 
‘new record to the file, or delete or 


amend an existing one, the file is 
automatically re-sorted. 
Searching for particular items or 


groups of items, accumulating 


totals from individual fields on all 
or some of the records and (if you 


have a printer) printing out sorted 
lists, reports or labels, can all be 
readily achieved with the Archive 
| database system. Archive also 
allows you to have several 
database files open at once, so 
for more complicated 
applications it is ideal for linking 
together related information. 


FIRST STEPS. 


Naturally; before you can use a 
tool effectively you need to know 
what it does and the basics of 
how to use it. This doesn’t imply 
that you need to pore over every 
detail of the manual — in fact this 
is probably counter-productive. 
It’s far better to experiment with a 
few simple examples first. 

An obvious contender is the 
telephone/address list since it is 
quite straight-forward and 
probably all of us have one, even 
if it’s only scribbled in the back of 
our diaries (maybe it is ina 
card-index box!). Load Archive 
and try typing the following: 


Create “Phone” <ENTER> 
Surname$ <ENTER> 
Firstname$ <ENTER> 
Address$ <ENTER> 
Telephone$ <ENTER> 
endcreate <ENTER> 


You have just created your first 
database file — it really is as 
simple as that! The effect of the 
above command is to create a 
file named “Phone_dbf” (the 
“_abf” part of the filename is the 
default file extension for database 
files) and each record in the file 
will have 4 text fields for storing 
the name, address and ’phone 
number of the people on the list. 
To insert some names and 
addresses in the file just type: 
insert which should cause a 
blank record to be displayed for 
you to type in the details. When 
you have entered a number of 
records press <F4> to leave 
insert mode. You could nowtry a 
number of the commands like 
order which sorts the file into 


Index Lin 


ascending or descending 
alphabetical order on any field 
(eg, Surname$), cls which clears 
the screen, display which 
displays the current record, 
search, find and locate which 
are different ways of looking for a 
particular record, or alter which 
is used to change the record on 
display. There are many more 


“commands on which you will find 
’ full details in the User Guide 


or, if you press <F1>, on 
Archive’s own help pages. It’s 
worth trying as many of the 


- commands out as possible so 


that you get the feel of what you 
can do, and if you do this before 


. you type in too much data, you 


won't feel too bad if you make an 
error and delete some data 
accidentally! (Do it after 2 hours 
typing and it’s much more painful 
— so always remember to back 
up all your data at least once on 
another cartridge.) When you 
have finished using a file, to make 
sure it is all present and correct 
on the microdrive cartridge, you 
must type close, or quit (which 
also returns you to SuperBASIC) 
or new (which also clears any 
procedures or special screen 
formats from the computer’s 
memory). To examine the file 
again use the command look or, 
if you want to change the file at 
all, open. 

When you are reasonably 
confident about using 
commands the next step is to try 
to incorporate some in a few 
simple procedures. Procedures 
are ways of storing often 
repeated sets of commands, or 


of carrying out some processing 


on the data in the database. 

For example, if you type all 
your address list into the 
machine it’s not very convenient 
to have to nip up to the computer, 
load Archive and the database 
and then locate the required 
name, every time you want to 
ring someone up. It’s much 
easier if you have a paper list too. 
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The advantage the database 
gives you for storing the address 
list is that it is easy to change and 
keep in alphabetical order, and it 
may be useful for things like 
typing:address labels 
automatically. So to get the best 
of both worlds we need to write a 
procedure to print out the 
address list whenever an 
up-to-date copy is required. To 
do this first enter the command 
edit, to use Archive's screen 
editor, and type in the following 
procedure. The language used is 
actually a dialect of BASIC 
specifically developed for the 
database package and 
incorporating all the commands 
which can be used directly from 
the keyboard. Here’s the 
procedure: 


proc AdList 


OWNER’S MANUAL 


to read. Remember, anything 
you can write with a GOTO you 
can write in a structured form 


‘using if / then / else / endif or 


while / endwhile. If you need to | 
jump forwards in the program an 


' if statement could replace the 


jump, if you need to jump 
backwards a while could be 
used. Other additional features 
of the language include the trace 
command which shows you the 
statements as they are being 
executed — very useful for 
debugging. 

Having noted some of the 
differences with BASIC, writing 
procedures for Archive is 
nevertheless in most respects 
very similar to writing in 
SuperBasic, and it’s not the 


‘intention of this article to spend 


rem *** Prints the address list on the 
rem *** screen or to a printer 
input “Send output to printer (y/n)? “;Ans$ 


spooloff 


if Ans$< >“y” and Ans$< >“Y” 
_Cls :rem *** Output sent ae screen 


‘spoolon screen 
endif 


first :rem *** Start at the beginning of the file 


while not eof( ) 


Iprint “Name: +Firstname$+” “+Surname$ 
Iprint “Address: “+Address$ 
Iprint “Telephone: “+Telephone$ 


Iprint 


next :rem *** Go to the next record 


endwhile 
spooloff 
endproc 


The procedure prints out a list of 
all the addresses in the database 
in the order in which they are held 
in the file. If you used the order 
command this will be 
alphabetical order, otherwise it’s 
likely to be in an order related to 
how you typed it in. Having typed 
in the procedure, press <ESC> 
twice to exit the editor and use 
save to store the procedure on 
microdrive, as the procedure will 
be lost from memory when you 
quit or type new. To try it out 
type Adilist. 

The procedure demonstrates 
a few features of Archive’s 
language like the conditional 
statement (if) and the loop 
statement (while) which use a 
strictly structured form — no 
GOTO’s allowed! It may take a 
little getting used to if you’ve only 
used BASIC before, but while it’s 
sometimes a little inconvenient it 
should result in clearer programs 
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too much time on this aspect. As 
practice in writing procedures try 
writing one to help inputting the 
data. For example after asking 
for each field it could change the 
surname to upper-case, 
firstname to initial upper-case 
followed by lower-case, and 
check the phone number 
contains only numbers. Use the 
append command to enter each 
record into the database. 


APPLIED SCIENCE 


What about other more 
complicated applications? The 
really good thing about Archive is 
that you can tailor it to your own 


' interest and use it to store and 


organise data how you want 

it. There is no limit to what you 
could apply it to: stock control, 
mailing lists and lending libraries 
are some obvious suggestions, 
but what about butterfly 
collecting, gardening, school 


| reports and form lists (for 


teachers), facts for exam revision 
(for pupils), quiz games (and 
other trivial pursuits), catalogues 


| of products, photograph 


‘ collections, analysis of 


| experimental results or even 
- Storing information about your 


wine cellar! 

The first part of the job is to 
really examine what you want to 
do and how you think Archive is 
going to help. It’s all too easy to 
jump in with both feet, spend a 
few hours bashing the keyboard 
to set up a database, and 
probably quite a few more hours. 
typing in the data, only to find that 
it doesn’t do the job you want it to 
do. Even with thought you may 
not get it right first time, but you 
can always add enhancements if 
you’ve got the basic structure 
right. A little time spent examining 
the problem at the beginning 
really pays dividends. 

Archive allows you to use 
multiple data files simultaneously, 
which is a feature you may want 
to use as it is very useful for 
referring to a different set of 
information from a data record. 
For example, a school form list 
might well contain the addresses 
of the pupils, but it would be ~ 
inconvenient to also store the 
reports in the same file, and 
time-consuming to type 
addresses into the report file. 
Two files with a simple cross- 
reference between them is 
therefore required. 

If you do reference other files it 
is important that you pick up the 
right record. Surnames are rarely 
unique, and even with initials or 
first names can often be 
duplicated, so it is better to have 
another field for a reference 
number. Such a field is known as 
the primary key to the file, and 
one value of the primary should 
key give us only one record. 

As well as considering what 
data you want to store and 
whether it can conveniently be 
stored as one or more files, you 
must consider how the database 
is going to be used — how 


information gets in and how it 


gets out. Ideally data going in 
should be checked to make sure 
it is cgnsistent with what is 


_ already in the database, and data 


being output may well be 
required in the form of a report 
(for which a procedure will 
probably be needed) or a special 


screen format (which can be 
designed using the sedit 
command). How much time you 
spend writing input procedures 
and so on will really depend on 
how important it is that mistakes 
are found during input, and 
possibly on who inputs the data. 


PHILASOPHY 


Consider another example — 
collecting stamps. Depending on 
the size of your collection you 
might want to store data on each 
of your stamps, or just those in a 
particular album, or maybe one 
data record per page or per 
album. Depending on how you 
want to use the data and what 


- sort of reports you want the 


computer to give you when all 
the data has been entered, you 
might want to store the purchase 
price of stamps, their estimated 


Value, catalogue cost, condition, 
_ date of issue, and so. You might 


even want to store details of 


_ Stamps that you’d like to own 


one day! You will need to take 


_ into account the total number of 


records you want to create, as if 


‘you have an unexpanded QL and 


sort your files on one field, the 
maximum would be about 1000 
records. If you collect stamps 
and wish to use Archive to 
catalogue your collection you 
may choose to store slightly 
different data from that which | 
that chosen, but in any case here 
is an attempt at setting up data ~ 
files for this application. 

Looking at the data to be 
stored you will see that it falls into 
two categories: data about 
particular stamps in the 
collection, and data about 
particular types of stamps (of 
which there may be a number of 
examples in the collection). This 
suggests that two data files will 
be needed. The following two 
procedures define suitable 
database files: 


proc NewTypes;Filename$ 


proc NewTypes;Filenases 
rea tte Creates a new-file for storing 
rea ### data about types of staaps 
create Filenase$ logical ‘T* 
Type_Ret _Wo 
Stanp _Naaes 
Country$ 
Issue_Dates 
Nint_Value 
Used _Value 
Conaents$ 
endcreate 
order Type_Ret_Noja 
endproc 


proc NewCollection; Filename$ 


proc NewCollectionjFilenases 
rea ### Creates a new file for staap collection 
create Filenaaes logical "S° 
“Staap_Ret _No 
Staap_Type 
Page_No i 
Position _No 
Hint 
Purchase_Dt$ 
Cost 
Sale_Value 
Consent s$ 
endcreate 


Having run these procedures Other useful procedures 

with suitable file names as would be one to print the 
parameters we can startentering catalogue of the whole collection 
data about stamps. Howevera —_ and one to print asummary 
data entry procedure might be report of the total value of the 
useful which could search for the collection. Here are my 
appropriate stamp type name suggestions for these 

and if the type had not yet been —_ procedures, firstly to output the 
entered allow both files to be value of the collection: 

updated together. 


proc FindValue 


proc FindValue 
rea ### To show total value of albus 
spoolon screen 
cls :CenPrint;*Total Cost and Value’ ,80 
CenPrint)*-------------------=" 803 Iprint 
let Total_Val20: let Total_Cost=0 
all °S°* 
let Total_ValsTotal _Val¢S.Sale_Value 
let Total _Cost=Total_Cost+S.Cost 
endall 
CenPrint;"Cost of collection = ‘"tdec (Total _Cost,2,8) ,80 
CenPrint;"Estiaated sale value of collection = ‘*tdec(Total_Val ,2,8) ,80 
spooloff : print : print sYesNo; "Okay?" 
endproc 


proc Catalogue 


proc Catalogue 
rea ##t Prints catalogue of collection to screen or printer 
print sYesNoj"Do you want the catalogue sent to printer?® 
spooloff : if not yess spoolon screen : endif 
let yes=0 
while not yes 
YesNo; "Print catalogue in Country/Date order?" 
if yes 
_ use °T"s order Country$;a,Issue_Dates;as first 
use "S": order Staap_Type;asHeading;! 
while not eof (*T") 
use "S": locate T.Type_Ret_No 
while §.Staap_Type=T. Type Ref_No and not eof (°S*) 
 PrinStaaps next °S": endwhile 
next “T°: endwhile 
Iprint rept(*-",79) 
else 
YesNos "Print catalogue in Page/Position order of albua?® 
if yes 
use "Ss order Page_Noza,Position_Noja 
use °T°: order Type_Ref_Noza 
Heading;2s first °S* 
while not eof (*S") 


use "T's locate S.Staap_Type 
PrinStaaps next °S°s endwhile 
Iprint rept("-",79) 
endif 
endif 
print :YesNo;"Qkay?° 
endwhile 
Reorder: spooloff 
endproc 


proc Heading;N 


proc Heading;N 


rea ##@ Output heading for catalogue” 


let Ord$="Country/Issue-date’ 

if N22: let Ord$="Page/Position": endif 

cls :CenPrint;°STAMP CATALOGUE for albua: "+Albua_Name$,79 
Iprint :CenPrint;"printed in *+tOrd$+" order®,79: Iprint 

Iprint : Iprint rept(*_*,79):BlankLine 

Iprint "Page Pos.! STAMP NAME {! Country i Issue Date 


Cost | ValueiCat.Vali* 


print <"t:5 --.- 2: Wes es ee fees yoesas | ere sects ae H 
poe as iS cele te 

BlankLine:BlankLine 

endproc 


proc PrinStamp 


prac PrinStaap 
rea ### Outputs details of one staap (current record) 
Iprint "!"sdec(S.Page_No,0,4);dec(S.Position_No,0,4);° 
{"ssCenPrint;T.Staap_Naae$,!7 
Iprint "i"s:CenPrints;T.Country$,{3: Iprint "1"; 
CenPrintsT. Issue _Date$,12: Iprint °!"; 
CenPrintsdec(§.Cost,2,6)+° {°+dec(S.Sale_Value,2,6) ,14 
Iprint "I"; . 
if S.MintsCenPrintsdec(T.Mint_Value,2,6),7 
else :CenPrint;dec(T.Used_Value,2,),7 endif 
if S.Comments$(>** or T.Comaents$<>°" 
Iprint "i": Iprint °! { "5 
Cenprint;S.Conaents$+" / °+7.Comaents$,49: endif... 
Iprint °i"sBlankLine 
endproc 


Notice that the “Catalogue” line in the table, and the details of 
procedure calls other procedures | individual stamps. 
to output the heading, a blank ‘ 


proc AltStamp 


“proc AltStaap 
rea #tt Alter existing staap record 
Which 
YesNo;"Do you wish to change the staap type?” 
if yes: cls :GetType: let S.Staap_Type2T.Type_Ref_Nos endif 
use "Ss alter : return 
endproc 
proc BlankLine 
rea t#t Blank line in catalogue 
Iprint "! H 
H H ie 
endproc 
proc Bye 
rea ### Closes all files that aay be open 
while 1: close : enduhile 
endproc 
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proc GetType 


rea ttt Finds appropriate staap type (or enters it) 
print : print "What is the type of staap to be entered?® 
use "7": let yes=0 
while not yes 
print "Reply with staap Type_Ref_No (if known)® 
print ° or part of Staap_Naae (not nuaerical)® 
print ° or press CENTER) to enter new staap type.° 
print : input "Staap type: ";Ans$ 
if Ans$=°"sInpType: else 
let Ref_No=val (Ans$) 
if Ref _No(>0s locate Ref_No: display : else 
find Ans$: display 
while not yes ; 
if found(): sprint : print tab 12)" "sYesNos"OK (y/n)? * 
if not yes: continue : endif 
else : print "NOT FOUND #e8 "33 let yes*ls endif 
endwhile 
endif 
endit 
sprint sYesNo;°Is this staap type the correct one?": cls 
endwhile 
endproc 


proc InpStamp 


rea t## Input new staep record 

cle : print INPUT" 

use “S": last srem ### Set up Ref. No. 

let S.Staap_Ret_No2S.Staap_ret_Noti 

GetTypes let §.Staap_Type=T. Type_Ref_No 

let S.Mint20: let S.Page_No=0: let S.Purchase_Dt$="" 
let S.Cost=0: let S.Sale_Value*0: let S.Comaents$="" 
let S.Position_No=0 

use "S"s append : alter : return | 

endproc 


proc InpType 


rea #2 Input a new staap type 

YesNo; “Are you sure a new staep type is needed?" 
if not yess return : endif 

let OKzi: use “T's last 

let T.Type_Ref _No=T. Type Ref Not! 

let Staap_Nane$=°*: let Country$="Great Britain® 
let Issue_DateS="VYVY/HN/DD's let Mint_Value=0 
let Used Value=0: let Conaentss="* 

append : alter 3 raturn 

endprac 


proc Menu 


ren ##t Display and execute options 

Reorder 

while 1 
cls s print 3 print "Choose option:® 
print : print tab 10;°(f) Insert new staap" 
print tab 10;°(A) Alter stamp" 
print tab 10;°(C) Output catalogue’ 
print tab 10;°(V)  Estiaate value of collection” 
print : print tab 10;°(X) Exit (and close files)® 
let ASzinkey(): let AS=getkey() 
if upper (A$)="I":InpStaaps endif 
if upper (A$)="A°:AltStaap: endif 
if upper (A$)="C*sCatalogue: endif¢ 
if upper (AS) =°V°sFindValues endif 
if upper(A$)2°X"s error bye: stop : endif 
endwhile 

endproc 
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proc Start 
rea ### Start-up procedure 
aode 1,8 cls 
YesNo;"Does the Staap Catalogue file exist (staap types)?° 
input "Nase for Staap Catalogue files °;NS 
if yes:VesNo;"Need to aodify?® 
if yes: open N$ logical "T°: else look NS logical "T°: endif 
else sNewTypes;N$: endif 
YesNo; "Does the Staap Albue file exist?® 
input "Nase for Stanp Albua file: ";Albua_Nases 
if yes: YesNo; "Need to aodity?° 
if yess open Albua_Naee$ logical °S° 
else : look Albue Naae$ logical °S": endif 
else :NewCollection;Albua_Naaes: endif 


rea #2 Identifies the staap for change 
let yes=0: use °S*s display 
while not yes 
input "Staap reference nuaber? °;Ret_No 
locate Ref_Nas sprint 
print ° 
YesNo;"Correct staap? ° 
enduhile 
endproc 


proc YesNo;P$ 


proc YesNo;P$ 
rea ttt Gets Y or N froa keyboard and sets "yes" 
while 1 
print P$3: let Q6slower (getkey()) 
let yes=(Q$2"y") 
if instr("ny",Q$): print ° "+0¢ 
return 3 endif 
print : endwhile 
endproc 


Allthe procedures also make use outputting a centred line of text, 
of the following more general reordering the files, and obtaining 
purpose procedures for ayes or no reply to a prompt. 


proc CenPrint;S$,Ln 


% 

proc CenPrintsS$,La 
rea #88 Centres or truncates string in given length 
if len(S$)>=Lns Iprint S$( to Lady: return : endi¢ 
let Tsint ((La-Len(S$))/2) 
Iprint rept(® *,T)sS8srept(® °,La-T-len(S$)); 
endproc 


proc Reorder 


proc Reorder 
rea #tt Puts the files back in Ref. No. order 
use °S"s order Staep Ret _Noza 
use °T°: order Type Ref _Noja 
endproc 


The procedures make use of the opened the same logical names 
logical names of the files “S” and . should be specified in the open 
“T” given when the files were or look command. 

created. Whenever the files are 


ARCHIVE 


/Qm4 


DELTA DISK 
INTERFACE 


UNIQUE 3 IN 1 FEATURES 
@ Double Density Disk Interface 
@Centronic Printer Interface 


@ Memory Expansion 
Delta 64— 64 K extra RAM 
Delta 128 — 128 K extra RAM 


SPECIAL 
PACKAGE 


$ L 
£210 “ 


ee 


i Double density fj Compatible with most QL Software 
i Support up to 4 Drives Hi Professional quality and reliability 
Mi RAM Disk facility Mi Upgradable to 

Gi Centronic printer interface built in ri DELTA 64 - 64 K RAM 


Hi Compatible with Microdrive DELTA 128 - 128 K RAM 


Technology Research Limited 


ii ae FOR THE AREER 


i 
| 
| 


; 
| 
| 
i 


| 


| 
ses —_ ee ee ee eee ee ee eo oe ee ee eee eee eee eee 


PLEASE SENDE [ovis [ony [ owtaee [ oy [utes | ay | rar 
friraceonty «| ezeso || errsoo | | cvoaso | |e] 
inerace 45%" SiglesvesoveckDs.| ezino0 | | s~sso0 | | ezeno0 | [x00 
Interface & 32" Single drive 80 track D.S. | 225000 | | 220000 | | eat0.00 |_| £8.00 
[essoao | [ssen00 [| evoo | [e800 

ae 


*All prices include VAT and apply to UK only 


Name 
Address 


Interface & 3/2” Twin drive 80 track D.S. 


___ Postcode 
QL1i2 


DIPPING IN 


Assorted printer driver and DIP switch settings for the QL 


’ PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate : 
End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 
Baud Rate 
End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

. Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 
Translate 2 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 
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Shinwa CP80 (type1) 


None 
9600 
CR, LF 
FF 


ESC, ” 
none 
ESC, " 
ESC, " 
ESC, " 
ESC, “ 
ESC, 
ESC, 
ESC, 
ESC, ” 
"2,12 


,0 


HORROF- 
n 
ce 
m 


. 


OFNGH) 1 Ae © 


Brother EP22 


none 
300 
CR, LF 
FF 


none 
none 
none 
none 
none 
none 
none 
none 
none 
none 
“£,156 


Brother EP44 
none 


1200 
CR, LF 
FF 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 
Translate 2 

(Red On] 

[Red Off] 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Translate 1 


Qume LP20 


ESC, "C, ESC, "9 
none 
DEF 
DEF 
ESC, “C 
ESC, "R 
none 
none 
none 
none 
“£,35 


Brother HR15/25/35 


35,92,8,61 
ESC, "A 
ESC, "B 


SPG 8010 


ESC, “R, 4 
none 
ESC, “d 
ESC, “e 
ESC, "f,1 
ESC, "f,0 
ESC, "h,0 
ESC, “h, 1 
ig a) 


( 


co 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 


. Postamble Code 


Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER» 


Parity 
Baud Rate 


End of Line Code — 


End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On : 
Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 


Riteman II 


“£, ESC, "I, "33,6, ESC, "I, 48 


OK Writer 


24,ESC,0 
none 
ESC, "H 
ESC, "I 
ESC, “C 
ESC, "D 
ESC, 28 
ESC, 0 
ESC, 31 
ESC, 0 
"2,35 


Diablo 


none 
9600 

CR, LF 
FF 

none 
none 
ESC, 33 
ESC, 34 
ESC, "X 
ESC, "Y 
ESC, "G,1 
ESC, "Z 
ESC, "G,0 
ESC, "Z 
“£,35 


Brother M1009 


CR, ESC, 9,0, ESC, "9 
none 

ESC, "W 

ESC, "& 


Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 


Translate 1 


[NLQ: On} 
PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 

C[NLQ On] 

[NLQ Off] 


PRINTER 


Parity 

Baud Rate 

End of Line Code 
End of Page Code 
Preamble Code 
Postamble Code 
Bold On 

Bold Off 
Underline On 
Underline Off 
Subscript On 
Subscript Off 
Superscript On 
Superscript Off 
Translate 1 
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ESC, “E 
ESC, “R 
ESC, 30,6, "U, ESC, 30,8 


’ ESC, 30,6, "D, ESC, 30,8 


ESC, 30,6, “D, ESC, 30,8 
ESC, 30,6, "U, ESC, 30,8 
“£,35 


Kaga Taxan & Canon PW1080A 


Epson LX-80 


none 
9600 
CR, LF 
FF 


ESC, "@ 
ESC, “R, 0 
ESC, "E 
ESC, "F 
RSC, "~,1 
ESC, "-,0 
ESC, "S, 1 
ESC, “T 
ESC, "S, 0 
ESC, “T 
"2,35 
ESC, "x, 1 
ESC, "x, 0 


Daisystep 2000 


none 
1200 . 
CR, LF 
FF 
none 
none 
ESC, "Q 
ESC, "& 
ESC, "a 
ESC, "R 
ESC, “U 
ESC, “D 
ESC, "D 
ESC, “U 
"2,35 
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Dip Switch Settings 


Daisystep 2000 


Printer Manufacturer’s 
Interface 
Al On Bl - SW1i Left 


A2 On B2 On SW2 Left 
A3 On BS On SW3 Right 


Juki 6100 
Printer Manufacturer’s 

Interface 
Al Off SW1i On A7 Off 
A2 Off SW2 On A8 On 
A3 On SW3 Off AQ orf 
A4 Off SW4 Off A1O Off 


A5 On SW5 Off 
A6 On SW6 On 


Riteman II 
Printer 
Left Right Upper Right 
L-1 On R-1 On UR-1- On 
L-2 On R-2 On UR-2 On 
L-3 On R-3 Off UR-3 On 
L-4 On R-4 Off UR“4 Off 
L-5 Off R-5 On UR-5 Off 
L-6 Off R-68 On UR-6 Off 
L-7 Off R-7 Off UR-7 Off 
L-8 Off R-8 Off UR-8 Off 
UR-9 Off 
UR-10 On 
Epson LX-80 
Printer 


1-8 Off 2-4 Off 
1-7 Off 2-3 Off 


1-6 On 2-2 On 
1-5 Off 2-1 Off 
1-4 Off 
1-3 Off 
1-2 Off 
1-1 Off 
Brother HR-5 
Printer 
1-1 Off 2-1 On 
1-2 On 2-2 On 
i=—3'- Off 2-3 Off 
1-4 On 2-4 Off 
1-5 off 2-5 OF? 
1-6 On 2-6 Off 
1-7 Off 
1-8 off 
Brother M1009 
Printer 
Version K Later Version K Later 

Versions Versions 
1-1 Off 1-1 On 2-1 On 2-1 On 
1-2 On 1-2 On 2-2 On 2-2 On 
1-3 On 1-3 On 2-3 Off 2-3 Off 
1-4 On 1-4 On 2-4 Off 2-4 On 
1-5 On 1-5 On 2-5 On 2-5 Off 
1-6 On 1-6 Off 2-6 off 2-6 Off 
1-7 Off 1-7 off 2-7 On 2-7 Off 
1-8 Off 1-8 off 2-8 On 2-8 On 
Kaga Taxan & Canon PW1080 
Printer Manufacturer’s 

Interface 

1-1 On 2-1 Off 3-1 Off 
1-2 On 2-2 Off 3-2 Off i 
1-3 Off 2-3 On 3-3 Off ! 
1-4 Off 2-4 Off 3-4 Off 
1-5 Off 2-5 orf 
1-6 On 2-6 Off 
1-7 On 2-7 Off 
1-8 Off 2-8 Off 


QfLash presents 
RAM disk for the QL 


The ultimate in speed, reliability, features, and compatibility 

Seven times faster than other RAM disks 

QL screen image (32768 bytes) loads in 0.15 seconds! 

\/O-intensive programs run up to 100 times faster 

No bugs reported since initial release in August 1985 

Full dynamic memory allocation — no FORMAT command necessary. No 
memory reserved for file data unless really used for your files 

Up to 8 RAM devices can be used with up to 255 files per device 
Works on standard (128K) QL and with all QL software, and takes full 
advantage of expansion memory up to the 640K maximum 

Just as easy to use as microdrives of floppies, but much faster 
Incredible low price £27.00 or DM 97.00 (all included) 


Send Eurocheque to QfLash, Post box 102121, D-2 Hamburg 1, 
W-Germany or call (Hamburg) 6512742 or 7650461 


A QUIZZICAL AND PUZZLING 
CHRISTMAS? 
FUN FOR ALL THE FAMILY WITH 


Cheques, POs to: 


Megacycal Software 


PO Box 6, Birkenhead, Merseyside, L43 6XH 


QL Quiz. A single user and competitive 2-4 player quiz, over 1000 
questions, with powerful editor option to alter rules, add questions, 
IMA GRY OUNFO MN QUIZ, axzres neta tay soot. <Ststvcdcc ava ssevesateoctnetoe eae £20.00 


Gumshoe Logic. Logic puzzle program set in a detective agency, 5 
levels of difficulty, randomised CASES .........ccccccscsescsseseseeeeeeee £12.00 


INVESTORS! 
Track your shares with ORTFOLIO 
“STOCKMARKET MANAGER” SOF TWARE 


from Portfolio Software bi 
New, Improved Version! Facilities include 
Simple entry of purchases, sales, prices etc 
Portfolio valuation — analysed by investment type 
— comparison of performance against market. 

Calculation of % return on each investment. 
Assessment of CGT liability. 
Handles all investment types, including Traded Options 

Order now at special price of £34.95 inc! p&p 


ARE YOU SURE YOU’RE INSURED? 


Get the best value in house insurance with this new product from 
Portfolio Software “INSURANCE MANAGER’. Facilities include: 
© Quantify total contents value by risk category. 
e Database of key insured items. incl. details of purchase. serial 
number, insured value etc!’ 
Evaluate best quotation from competing companies 
Special introductory price of £24.95 incl. p&p 


PORTFOLIO SOFTWARE -— 
THINKING SOFTWARE FOR PRACTICAL USERS 


Orders/cheques to PORTFOLIO SOFTWARE, PO BOX 15, LONDON SW11 
SRP 


Please send: “STOCKMARKET MANAGER” @ £34.95 incl. 
“STOCKMARKET MANAGER’ information Sheet 


No. of copies ‘ 


(Enclose large SAE) 
“INSURANCE MANAGER” @ £24.95 incl. 


“INSURANCE MANAGER’ Information Sheet 


(Enclose large SAE) 
Overseas mail add £2.50 Europe; £5.00 elsewhere 


' Introduces 


Q-Disc WINCHESTERS 


10, 20 or 40 Megabyte 
Winchester disc systems 
with optional 
3.5in. floppy disc drives. 


PRICE LIST (excluding VAT) 


1OMb system only ... £1100 
10Mb with one Floppy . £1250 
10Mb with two Floppies £1400 
20Mb system only .. . £1500 
20Mb with one. Floppy . £1650 
20!1b with two Floppies £1800 
40i1b system only ... £2700 
4GiMb with one Floppy . £2850 
40Mb with two Floppies £3000 


CST are pleased to announce yet another first for the Sinclair QL. 


A range of 10, 20 and 40Mb Winchester systems with optionally one or two 3.5 inch 720K 
Floppy disc drives and high speed tape streaming output, in one enclosure. 

These systems are designed for the professional office environment and care has been 
taken to avoid unsightly cable connections. és 

With the exception of the 1OMb unit without floppy, the QL power supply is built in and 
there are 4 mains outlets at the back for monitor, printer, graph plotter etc... 

Winchesters can store huge amounts of valuable information; for example a 10Mb unit can 
store as much as approximatly 100 microdrives. Good back up is essential when relying on 
one storage facility. Hence CST has developed a simple yet sophisticated system to provide 
easy backup of data on floppy disc, high speed streaming tape or microdrive. 

The CST Winchester systems were developed with close co-operation from Sinclair Research 
Ltd and are fully compatible with the QL, QD0OS, Psion application programs and all planned 
Sinclair peripherals and software. 

For applications requiring more than one interface, the CST Q+4 Expansion system can be 
used (as illustrated above), to connect up to four interfaces to the QL. 

If you have any questions as to which system would be most suitable for your application, 
please do not hesitate to contact us. 


Orders To | 2 ( 


24 Green Street 
Stevenage . ») 
Hertfordshire SG1 3DS ; 


Telephone (0438) 352150 Cambridge Systems Technology 
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- (EGE The Commands 


Last month we developed a 
number of general library 
routines for use within our 
programs. In so doing we looked 
at how to enter information on 
the computer (gen_in), how to 
display it (orompt) and how to 
store and retrieve it using DATA 
statements or files on microdrive 
cartridges. Here using similar 
techniques we examine how the 
QL understands things, makes 
decisions about them and 
manipulates them. 


NUMBER 
CRUNCHER 


Everything on a computer is dealt 
with numerically. Where we are 
dealing with numbers as 
opposed to characters this 
poses few problems. Simply 
regard the QL as a glorified 
calculator with virtually unlimited 
memory. Arithmetic operations 
need not be entered step by step 
but may appear all together on a 
single line:. 

PRINT 3+2*5+7 

When entering complex 
formulae on the QL there are two 
points to note. First, the order of 
evaluation is determined by the 
priority of the arithmetic operator 
(see Table 1). 


z= SYMBOL DESCRIPTION 
ee. Raise to the 
@) power 
x 2) he Multiplication 
fp Division 
DIV Integer Division 
MOD Integer 
Remainder 
(ie modulus) 


Addition 
= Subtraction 


” Table 1: Arithmetic Operators 


Second, whilst the QL is 
capable of handling numbers 
over a range from —10°616 to 
+10°616 it is accurate to only 
SEVEN SIGNIFICANT FIGURES. 
Anything in excess will be 
rounded up and expressed as a 
seven figure number followed by 
its exponent. For example: 
PRINT 1234567 
gives 1.234567E6 


CHARACTER CODE 


When it Comes to how the QL 
treats characters, things are a 
little harder to understand. What 
may appear to us as a letter, 
punctuation mark and even 
mathematical symbol is to the QL 
a uniquely coded number with a 
value between 32 and 127. This 
value is set according to a 
standard international code 
known as ASCIl (see Concepts 
Section in User Guide). To 
ascertain that this is the case 
enter: 

PRINT CODE(“A”) 

this will display the value 65. 
PRINT CHR$(65) 

this will display “A”. 

CHR¢§ converts the code back 
into the character. 

One interesting feature of the 
ASCIl code is that a difference of 
32 separates each upper case 
letter from its lower case 
equivalent. This means that if you 
want to convert any character 
from upper to lower or vice-versa 
you need only apply the following 


30000 REMark ##* Case convertor #### 
30010 DEFine PROCedure case_conv(str$) 


350020 LOCal f 

30030 teap$=str$ 
30040 FOR test = 
30050 # = CODE(str$(test)) 


1 TO LEN (str$) 


30060 IF #64 AND #¢91 THEN temp$(test)=CHRS(#+32) 
30070 IF £>96 AND #<123 THEN teap$ (test) =CHRS(f-32) 


30080 END FOR test 
30090 END DEFine 
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formulae respectively: 
lower$=CHR$(CODE 
(any_capital$)+32) 
upper$=CHR$(CODE 
(any_lower$)-—32 


. Often this is written as: 


lower$ = CHR$(CODE 
(any_capital$)+CODE 
(“A”)-CODE(‘“‘a”)) 

upper$ = CHR$(CODE 
(any_letter$)+CODE 
(“A”)—CODE(“a”)) 

Using this formula we can add a 
further procedure to our library 
(Listing 1) which when passed a 
string will change the case of 
each character within it, so that, 
a lower case character becomes 
an upper case one and vice 
versa. As usual the amended 
string will be returned in the 
variable temp$. 


STRING STORAGE 


To recap briefly then, when we 
assign a collection of characters 
toastring variable, each is coded 
and then stored in sequence. 
The amount of memory that a 
string occupies depends on its 
size and is not fixed as it is with a 
numeric or integer variable. In 
fact, the only limitation upon a 
string’s length is the amount of 
free memory available (where 
each character occupies one 
byte of memory). 

Once characters have been 
grouped together in a string they 
may be manipulated in all sorts of 
ways. For example, where: 
a$=“blackredgreenwhite” 
b$=“bluemagentacyan 
yellow” 
we Can join strings together 
(concatenate) using the & 
operator. 
all_colour$=a$ & b$ 
(ie all_colour$= “blackredgreen 
whitebluemagentacyanyellow”) 
or else we can extract a portion 
of a string. If a group of 
characters are required we must 
specify the positions of the first 
and last characters within the 
string. 
col1$=a$(1 TO 5) 
(col1$=“black) 
col2$=a$(6 TO 9) 
(Col2$=“red”) 


col3$=a$(1 TO 5)&“ and 
“&b$(1 TO 4) 
(col3$= “black and blue”) 
If we wish to extract a single 
character we need only give its 
position in the string. 
char1$=a$(17) 
(char1$=“t”) 
char2$=b$(20) 
(char2$=“w”) 
Just as we can extract portions 
from a string we can also replace 
portions within it 
a$(9 TO 13)=“ochre” 
(will replace “green” with 
“ochre“ a$= “blackredochre 
white”) 
However, when altering an 
existing string using this method 
itis important to bear in mind that 
you Cannot increase the amount 
of memory allocated to it. In other 
words you cannot change its 
size. For example an attempt to 
replace “white” in string a$ with 
“tangerine” (ie, a$(14 to 
23)=“tangerine”) would result in 
only the first five letters “tange” 
being moved in. The reason for 
this is'that a string’s size is set 
only when characters are 
assigned to the WHOLE of it. 
Replacement of some of its parts 
will not increase the memory 


‘allocation. So, if we want to add 


“tangerine we would use the 
following method: 
a$=a$(1 TO 13)& “tangerine” 
The length of a string can be 
found using the function 
LEN(string). 
PRINT LEN(“Sinclair QL”) 
will display a value of 10 
str_len% = LEN(b$) 
will restore length of the string 
b$ in str_len% 
For most complex string 
manipulations LEN plays a vital 
role. For example, SuperBasic 
unlike many other dialects does 
not have a RIGHT$ function. This 
permits you to slice strings up 
from right to left. However, using 
LEN such a function may be 
constructed with: 
slice$=a$(LEN(a$)+1- 


, characters_to_slice TO 
’ LEN(a$)) 


The command INSTR, short for 
“IN STRing”, allows us to search 
through a string to see whether 
another string is contained within 
it. It returns a value of zero if no 
match is found otherwise the 
position of the first character in 
the match will be returned. 


M1 = “cyan” INSTR b$... 
(returns 12 ie ** 
“bluemagentacyanyellow”) 

M2 = col2$ INSTR all_colour$ 
(returns 19) 

M3 = “blue” INSTR a$ 

(no match — returns 0) 

Often it is necessary to set up 
strings containing a large 
number of identical characters. 
Assigning each character in turn 
is both repetitive and prone to 
error, particularly where spaces 
are concerned. However, 
provided no more than two 
characters are to be repeated 
the function FILL$ may be used. 
You simply specify the 
character(s) to fill with and the 
length of the string to be filled. 
blank$=FILL$(“ ”,50) 
(creates a string with 50 spaces) 
asterisk$=FILL$(‘*”,5) 
(asterisk$=“"""""”, 
mix$=FILL$(“ —”) 

(mix$=“ —- -— ”) 

A possible application using 
FILL$ would be to centre a string 
on paper. Assuming you are 
using an 80 column printer this 
would be: 

temp$=FILL$(“ ”,(80/2-LEN 
(a$)/2))&a$:PRINT temp$ 

of course, a more efficient 
alternative would be to use AT 
AT (80/2-LEN(a$)/2):PRINT a$ 
Coercion (mentioned briefly in 
Part |) provides a bridge between 
different data types. It permits 
numbers to be converted into 
strings and strings to be 
converted into numeric values 
provided, in the latter case, that 
there is no type mismatch. 
Additionally, you can convert 
floating point numbers into 
integers and vice versa. The 
following examples illustrate 
what may be achieved. 


1. Integer to floating point 

10 x% = 237:y% =5 

20 result = x%/y% 

2. Floating point to integer 

10 fl_point = 678.54 

20 integer% = fl_point 

It is worth noting that numbers 
are rounded and not truncated 
as with the INT function. 

3. Numeric to string 

10° number=-—113.675 

20 string$=number 

30 PRINT string$(5 TO 8) 
4. String to.floating point or 
integer 

10 sale$=“23.50": 


cost$= “12.45” 
20 profit = sale$- cost$ 


30 NP% = (100*profit)/sale$ 


If a string holds non-numeric 
characters then conversion will 
not be possible. For instance 
value = “£123.45” will generate 
an error as the pound sign is 
non-numeric and consequently 
unacceptable. 

Aside from INPUT routines, 
this type of coercion is most 
commonly encountered where 
time or calendar date are 
incorporated into programs. 


CLOCK AND 
‘CALENDAR 


The QL’s internal clock (and 
calendar) works only when the 


machine is on. As aconsequence 
the date and time must be set at 


the beginning of every session. 
This is done using the function 
SDATE. It takes the form: 
SDATE year,month,day,hour, 
minute,second 

All values are numeric. However 


for reasons mentioned in the last 


section, if these values are to be 
INPUT they need to be entered 
as strings, checked and then 
coerced into their numeric 
equivalents. The library routine 


given in Listing 2 shows how this 


may be done (note that it makes 
use of the procedures given in 
Part 2 of this manual). 

Once the current date and 
time have been entered, the QL 
will keep track of them until it is 
switched off. To get time and 
date to display we use the 
function DATE$. This returns a 
string laid out as follows 
“yyyy mmm dd hh:mm:ss” 


‘In this case coercion would be 


required to process each bit of 
information. For example: 
10 birthyear%=1957 
20 now$= DATE$ 
30 years_old% = now$ 
(1 TO 4) - birthyear% 
An alternative to using coercion 
is to use the function DATE. This 
measures time in seconds and 
provides an economical way of 
storing information on file. DATE 
may be converted into a 
readable format using DATE$. 
The following program illustrates 
how this works: 
10 SDATE 1986,1,1,0,0,0 
20 PRINT “The date and 
Time is”!DATE$: now = 
DATE: 
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‘30 PRINT DATE!“seconds 


have elapsed since” 
!IDATE$(0)! 


As shown above DATE is 
measured in the number of 
seconds that have elapsed since 
“1961 Jan 1 00:00:00”. 
Incidentally, the furthest into the 
future you can go is 2/2/2097. 

The command ADATE allows 
the QL’s clock to be fine tuned. 
Adjustments are entered in 
seconds. 


ADATE 60 

(forwards 60 secs) 

ADATE —43200 

(back 12 hours) 

Another useful clock function is 
DAY$. This will return the day 


from the internal clock 

(Mon, Tue, etc). 
| PRINT DAY$ 

(will display current day) 
PRINT DAY$(0) 

(displays ‘Sun’ being 1/1/1961) 
This ties up our examination of 
SuperBasic. In the three 
installments of this manual we 
have tried to cover the areas 
which have hardly been touched 
upon by Sinclair’s User Guide. 
The object has been to shine 
some light on the unknown 
rather than restate the obvious. 
We end with a word of 
encouragement to those new to 
programming. Remember over 
90% of all programs ever written 
have bugs in them! 


LISTING 2 


30000 REMark #### Date Entry ###eet 
30010 DEFine PROCedure date_entry(ch,x,y) 
30020 LOCal loop,dte,yy$,ma$,dd$ 


30030 aa$=""; yy$=""sdd$="" 


4stemp$=DATES 


30040 REPeat d_inner 

30050 dte=0 

30060 prompt “Enter Day",1,5,40 
30070 gen_in dd$,2,ch,x,y:dd$=temp$ 
30080 prompt "“Month",1,5,40 

30090 gen_in aa$,2,ch,xt3,y:ma$=teap$ 
30100 proapt “Enter year in full",1,5,40 
30110 gen_in yy$,4,ch,xtd,y:yy$=temp$ 
30120 temp$=yy$keasudd$ 

30130 FOR loop=! TO LEN(teap$) 

30140 dte = teap$(loop) INSTR "1234567890" 
30150 IF NOT dte THEN EXIT loop 
30160 END FOR loop 

30170 IF dte 

30180 IF dd$>0 AND dd$<32 

30190 IF am$>0 AND an$<13 

30200 IF yy$>1984 AND yy$<1999 
30210 EXIT d_inner 

30220 END IF 

30230 END IF 

30240 END IF 
302502 END IF 

30260 END REPeat d_inner 

30270 = SDATE yy$,aa$,dd$,0,0,0 

30280 = AT @ch,y,x:CLS ch, 

30290 


proapt teap$(1 TO 12)&DAY$,1,5,40 
30300 END DEFine date entry 
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DELIVERED TOMORRC _— 
ELI ED TOMORROW 

oe 

sae 


Free WITH ALL PRINTERS: QL USERS PRINTERS GUIDE - 
a 


eo We supply a free booklet with all printers which explains how to obtain all the features available on your printer. 


@ DOT MATRIX INC VAT @ DISC DRIVES EX VAT INC VAT 

SHINWA CP A80 £189-75 Prices include power supply and interface. 

EPSON FX80 F/T+ £361-10 MICRO PERIPHERALS 

EPSON FX100 F/T+ £488-75 3'/," SINGLE DRIVE SYSTEM (.75 MBYTE) £244-00 $277.15 
3°," DUAL DRIVE SYSTEM (1.5 MBYTE) £365-00 £419-75 


DOT MATRIX PLUS NEAR LETTER QUALITY PCML DISK INTERFACE + 256K RAM & TOOLKIT 
EPSON LX80 SPECIAL OFFER £195-00 £224-25 INTERFACE £240-00 276-00 


CANON 4080A SPECIAL OFFER 235-00 270-25 31,” DUAL DRIVES 199-00 228-85 
JUKI 5540 (colour option) £249-00 $286-35 / 
CANON 1156 17” CARRIAGE 335-00 _£385-25 a TyekuniTin onires Consanarn 


@ DAISY WHEEL JUKI 2200 £245-00 281-75 


QUENDATA 41420 $225-00 258-75 
_ EPSON DX400 SPECIAL OFFER §356-00 £409-40 @ MONITORS 
PHILIPS 7502 GREEN __ 75-00  $86-25 
& COLOUR PRINTERS MICROVITEC CUB 1454 /653 220-00 253-00 


EPSON JX-80 SPECIAL OFFER £450-00 £517-50 
@ MODEMS 


@ PRINTER INTERFACES TANDATA (complete system including 
MIRACLE SYSTEMS $26-05 £29.95 FREE TELECOM GOLD/PRESTEL) £173-00 5198-95 


| COMPUTERS 
SINCLAIR QL ONLY £173-05 $199-00 eee aie Pee eer eee 


THE WORLDS BEST PRICES ON Q1/MONITOR/PRINTER PACKS 
COMPLETE PACK Package includes: SINCLAIR QL, MICROVITEC CUBS63, PRINTER & ALL LEADS AND INTERFACES | EDUCATIONAL - GOVERNMENT 
SPECIAL OFFER WITH EPSON LX80 F/T §775-00 £894-25 WITHCANON 1080  £812-00 £933-80 | OVERSEAS ORDERS WELCOME 
WITH CANON 4156 £900-00 £1035-00 OTHER PRINTERS ON REQUEST 


NOW ONLY 3 MINUTES FROM JUNCTION 23 M62 
PR| NTERLAN ) (MANCHESTER 25 minutes/LEEDS 20 minutes) NB. FROM EAST USE JUNCTION 24 
156 LONGWOOD Gate, LoNcwooo ~~ Tel HUDDERSFIELD (0484) 646048/9 


| 
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MACHINE CO 


ART 


The QL holds many 
secrets, which can only 
be unlocked in 
response to commands 
presented at the very 
lowest levels near the 
QDOS retreat... 


The machine code programmer 
talks to QDOS generally in one 
of two ways. The first is by 
executing a particular 68000 
TRAP instruction. The traps 
used by QDOS are #0, #1, #2, 
#8, and #4. 

Trap #0 is very basic and 
simply causes the processor to 
~ enter supervisor mode. This is 
often useful when we are inside 
jobs, which normally run in user 
mode, as it allows us to alter the 
interrupt state and move the 
system stack. ‘ 

Trap #1 provides a group of 
functions known as the ‘man- 
ager’ routines. These look after 
the major parts of the system 
such as jobs, memory alloca- 
tion and system lists. Each trap 
#1 routine is entered with the 
function number in register DO, 
and possible parameters in 
registers D7 to D3 and AO to 
A3. If the routine returns and 
results, these will be found in 
the same group of registers, 
and errors are reported gener- 
ally by setting register DO to a 
negative error code value. 


JOBS AND TREES 

If we take a look at the routine 
which scans a job tree, 
MT.JINF, for example, we find 
that it is entered by putting 2 in 
to DO before the TRAP #1 
instruction is executed. Other 
values it requires are the ‘job 
IDs’ of the job being scanned 
(in register D1) and the job at 
the top of the tree (in D2). When 
this routine returns, D7 holds 
the job ID of the next job in the 
tree, and registers D2, D3 and 
AO have been set to hold values 
relevant to the job which was 
scanned. 


The register usage, para- 
meters required, results re- 
turned and possible error con- 
ditions are given in the QL 
Technical Guide, along with a 
very brief description of each 
routine’s purpose. Trap #2 and 
trap #3 follow much the same 
lines as trap #1, except that 
each has a slightly different 
purpose. 

Trap #2 is used for I/O 
Allocation, which means the 
opening and closing of chan- 
nels. This trap also incorpo- 
rates file deletion and medium 
formatting. The trap #2 routine 
to open a channel, /O.OPEN, is 
called by putting 1 in to DO 
before executing the TRAP #2 
instruction. It needs a fair 
amount of information before it 
can open the channel. D7 is 
used to hold the job ID of the 
job which will ‘own’ this chan- 
nel, D3 holds a ‘key’ which 
determines how a channel 
should be opened (ie, read 
only, update and so on) and 
register AO points to the name 
of the file or device to be 
opened. If the open is success- 
ful, then DO holds 0 and register 
AO holds the ‘channel ID’ of the 
newly-created channel. 

Trap #3 deals with all the 
general-purpose |/O routines, 
allowing us to read and write 
single bytes or strings. Console 
/O also has a special ‘edit a 
line’ routine which allows a 
previously-typed line to be 
edited by the user at the key- 
board. Apart from these 
routines, trap #3 provides ac- 
cess to the enormous number 
of screen driver routines such 
as window panning and scroll- 
ing, ink, paper and strip colour 
changes, border alterations, 
circle and line drawing and 
recolouring. The final few trap 
#3 routines provide access to 
specialist file-handling oper- 
ations which allow things like 
reading and setting the header 


-on a file, moving the read/write 


pointer to any given position in 
a file (and, therefore, providing 
random access) and saving or 
loading complete files. Trap #3 
is probably the most used 
QDOS routine. 

Trap #4 is like trap #0 in that 


it has one purpose only in life: 
to tell the next trap #2 or trap 
#3 routine that the addresses 
being passed to it will be rela- 
tive to register A6 rather than 
absolute. It does this by setting 
a byte in the job’s header. 


VARIED VECTORS 


The other way of accessing 
various QDOS routines is via a 
‘vector’. A vector is a pointer to 
somewhere else, which may 
seem a bit strange, but its 
advantages are obvious. If the 
system is being updated often 
then it is very likely that the 
address of each routine in the 
system will alter from time to 
time. As information needs to 
be published about where 
these routines are, and as other 
routines need to call them, the 
fact that they alter often is 
rather inconvenient. But, if the 
addresses of each routine are 
placed in special pre-defined 
locations in memory which 
never change from version to 
version, it is extremely easy to 
access each routine. These 
special locations are the vec- 
tors, and the addresses inside 
the vectors are entirely 
irrelevant to us. We call the 
vectored routine by grabbing 
the address from the vector 
and then calling it as a sub- 
routine or jumping to it. The 
easiest way of doing this is as 
follows: 

MOVE.W___the_vector,A2 

JSR (A2) 

There is no reason why A2 in 
particular should be used, but it 
is generally speaking the most 
obvious choice. We move only 
a word in to the address regis- 
ter from the vector because 
each vectored routine is in 
ROM, which always starts at 
address $00000000 on a QL. 
Things are specially arranged 
to ensure that each of the 
routines starts at an address 
less than $00008000, which 
allows word-long addresses to 
be used via the ‘absolute short’ 
addressing mode. 

The vectored routines which 
exist provide many facilities. 
Some of them almost duplicate 
trap-invoked routines but have 
simpler parameters or can be 


used in certain situations only; 
other provide entirely new facili- 
ties which are useful to have 
around. Many of the vectored 
routines are used mainly by the 
SuperBasic interpreter, as they 
refer to the SuperBasic vari- 
ables such as the name table 
and name list. Other routines 
are useful in all sorts of appli- 
cations: the routines which con- 
vert numbers into dates and 
days of the week, for example, 
or those which convert num- 
bers into strings and vice versa. 
There are routines even to cre- 
ate and maintain linked lists, 
perform floating point arithme- 
tic operations and compare two 
strings. It seems that a good 
deal of applications software 
could be written entirely using 
QDOS vectored utility routines! 


CHANNELS AND IDs 

In order to be able to refer to a 
given channel or job uniquely, 
the operating system needs to 
have a number for that channel 
or job. As both jobs and chan- 
nels may be created and des- 
troyed asynchronously, a num- 
ber which increases on a per- 
job or per-channel basis is 
insufficient by itself. QDOS 
uses the same system for both 
jobs and channels, and the 
numbers used are referred to 
as the job or channel IDs. Each 
ID is held in a long word, which 
means four consecutive bytes 
(thirty-two bits), and comprises 
two parts. The lowest two bytes 
(sixteen bits) form an_ in- 
cremental number between 
zero and a given upper limit 
which refers to the channel or 
job’s position in its requisite 
table. The channels opened in 
a row, for example, may have 
positions two, three and four in 
the channel table. If channel 
two is then closed and a further 
channel opened, the new chan- 
nel will be given position two in 
the table as it is the first empty 


:slot. This position is often refer- 


red to as the job or channel 
number, but has nothing to do 
with the ‘#’ channel numbers 
used by the SuperBasic inter- 
preter. 

As this intimates, it is very 
easy for a channel to be closed 
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and another to be opened in its 
place before a job talking to 
that channel knows about the 
closure. If the job is reading 
from or writing to the channel it 
obviously will get very con- 
fused. To avoid such things, the 
high word (sixteen bits) of the 
channel or job ID holds a cyclic 
‘tag’ which is allocated by the 
operating system. So, to take 
our case of three channels 
being opened in quick succes- 
sion, they may still be given 
numbers two, three and four, 
and the tags might be four, five 
and six. 

Now, when channel two (with 
tag 4) is closed and the new 
one opened, the new channel 
two will have a tag of seven. 
The operating system can see 
straightaway that the new chan- 
nel is different from the first, so 
when a job attempts to com- 
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municate with the old channel 
two it will be told that this 
channel is not open. As these 
principles apply to jobs as 
much as to channels. the job ID 
mechanism is the same as the 
channel ID mechanism. 


LABELS AND TABLES 
To find the position in memory 
of a job, given its job ID, we 
need to know only a few things, 
If we assume that register A6 
points to the base of the system 
variables, the code below will 
return in AO the base address 
of the jobs whose ID is held in 
register D1. This base address 
is the address of the start of the 
code immediately after the job 
header. 


JB_TAG  EQU $10 
SV_JBBAS EQU $68 
JB_END EQU $68 


SV_JBTOP EQU $6C 


MOVE.W_ D1,D4 

EXT.L D4 

LSLL #2,D4 

ADD.L  SV_JBBAS(A6),D4 


CMP.L  SV_JBTOP(A6),D4 
BCC.S  BAD_JOB 
MOVEA.L D4,A0 

MOVE.L (A0),D4 

BMILS | BAD_JOB 
MOVEA.L D4,A0 

SWAP D1 

CMP.W  JB_TAG(A0),D1. 
BNE.S BAD_JOB 

LEA.L  JB_END(A0),AO 


“AO holds job's base address 

The label BAD_JOB is jumped 
to if the job ID passed in 
register D7 is invalid in any 
way. Apart from finding a job in 
memory, this routine also pro- 
vides a convenient way of tell- 
ing if a given job exists or not. 
As much the same techniques 
apply to channels, similar code 
may be used to discover if 


given channels are open, or 
where their channel definition 
blocks are. Obviously, the sys- 
tem variables used will need to 
be changed. 

Immediately before the 
LEA.L JB_END(AO),AO instruc- 
tion, register AO holds the 
address of the job’s job header. 
This header contains a great 
deal of useful information which 
may be extracted and in certain 
cases directly altered. The in- 
formation held here includes 
such things as the job's length, 
its owner, its priority and its 
suspension status, a pointer to 
its trap re-direction vectors and 
a copy of all the 68000 registers 
except the supervisor stack 
pointer. These register entries 
are particularly useful as they 
allow us to put things on a job's 
stack before it is activated, or to 
set up the registers. 


Did you miss Volumes | & Il 
of the QL Owner’s Manual? 
Then ring 01-251 6222 and 
ask for QL User 
Backnumbers 


SUPERB NEW QL PROGRAMS AVAILABLE NOW e 
FROM 


— 


ir 
L.B.O. BUSINESS Executive 
ORGANISER | Adventure 


wwe mw Gemini are pleased to announce the release of 
ee ee ee EXECUTIVE ADVENTURE for the SINCLAIR QL. 


“16 


This high quality product is a text adventure with a very 
original theme. Set in the “real world”, your objective is to 
rise from lowly tramp to high-flying executive by reaching 
the giddy heights of the chairman’s chair! 

The path is complex and challenging, requiring resourceful- 
ness and logical thinking to overcome the many obstacles 
and pitfalls along the way. The problems are many and 
varied, often several per room, some of which are 
graphical. Novel skills required include the need to find 
money and then to spend it wisely in acquiring vital aids to 
your progress. 


URGENT 


1 Phone Accountant 
2 MON 6 5.85 10.00 1 how 
to the dentist 


6 5851430 2 hows 
Ing with Jerry about plans for the new 


Delete Update Continue Exit 7 


0 
7 


There are over 140 rooms, and the program can 
understand a large vocabulary including multi-word 


Gemini are pleased to announce the release of LBO phrases. 

for the Sinclair QL, a comprehensive life and business . 
organiser package. This sophisticated and versatile Designed forthe novice and experienced adventurer alike, 
program has been carefully designed to provide a wide this novel adventure is different. Gone are the days of the 
range of very useful facilities, while still emphasising robo! anche: ayer Miay, @ompele with decainty Guates 
simplicity and ease of use. and secretaries! 


Equally suitable for social and business use, in the home or at work, LBO 
will put an end to forgetfulness and ensure that you no longer miss a’ 
business appointment, payment of a bill, or a birthday, and that you will not 
double book yourself at the same time. 


Features include: 
Automatic reminders of entries overdue. 
One week's advance notice of forthcoming events. 
Urgent notice board. 
Creation of categories of entries, e.g. bills, birthdays, letters to i written, note pad, etc. 
Sorting of appointments by date and time of day. 
Month's summary at a glance, indicating times booked and free. 
Single entry of a range of events and updating of regular appointments. 
Search facility for related entries. 
Month-by-month view of all forthcoming entries. 
Week's summary at a glance giving detailed information of times booked and free. 
Export to Quill. 
Warning of clashing engagements. 


Use LBO to organise your life from today until 1999! Itcan handle literally 
hundreds of multi-line messages, as many as you are ever likely to need. 
The system makes extensive use of the QL’s windowing facilities making 
the system clear and easy to use. 


Despite the wide range of facilities provided, this professional program is 
very easy to use and requires no knowledge of computers. A vital aid to 
your everyday life, LBO is actually fun to use! 


24 hour CREDIT CARD HOTLINE —AMEX/ACCESS only - uBED: 265165 


All stated prices include VAT and post/packing. a) 


To: Gemini Marketing Ltd., Gemini House, EXMOUTH EX8 4RS E 
Please supply QL LBO @ £19.95. Exec. Adventure @ £12.95. £ Total 


Name 


ONLY £19.95 on Microdrive Cartridge. 


Cheque/POs value £. enclosed, or please debit my Access/Amex no.. 


Signature. 
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' Export/Trade enquiries and Local Authority POs welcome. 
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EIDERSOFT DISK SYSTEMS 


AVAILABLE NOW EX-STOCK 


ee MM ey CREDIT CARDS 


1.C.E. ALL disk 


systems include ICE 
ROM software with 
CHOice see our other 
advert. IF YOU 
ALREADY HAVE ICE 
WE WILL REFUND THE 
DIFFERENCE!! 


SYSTEM 1 tri 


f 4 0 Q 128K extra RAM/Disk 


interface. Parallel printer port. 
Inc VAT All accessories. Twin 720K 
3.5 inch disk drives as shown. 


SYSTEM 2 ecmt 


£449 256K extra RAM/Disk 


interface. Toolkit commands. 
disk drives as shown. 


All accessories. Twin 3.5 inch 
IMPAACT IMPAACT 
SALES LEDGER PURCHASE LEDGER 


* Add/change/enquiry 

* Customer file 

* Delivery address 

* Cash/cheque receipt 
and matching - 

* Cash sales (shop) and 


QL BUSINESS PACKS. 
Special offers on disk business : 
software for all Eidersoft disk 


customers eg. 

QSPELL 3.5” disk £19.95 

XPERT int. accounts £129.95 
SAVE £50! 


* Add/change/enquire 

* Suppliers file 

* Cash/cheque receipt 
and matching 

* Record p.cash 
purchases.and refunds 


refunds * Invoice/credit note 
* Invoice/credit note entry 

production * Supplier outstanding 
* Statements invoices 


* Debtors report 
* Monthly transactions 


* Creditors report 
* Monthly transactions 


audit trial audit trial 
%* Customer turnover rep. * Suppliers turnover 
* VAT report report 


* Analysis report by 
nominal codes 


IMPAACT IMPAACT 
NOMINAL LEDGER STOCK CONTROL 


* List accounts 

* Journal entries and 
listing 

* Trial balance 

* Profit and loss report 

* Balance sheet 

* Budget entry 

* Comparative budgets 

* Interface and update 
from sales & purchase 
ledgers 


* Add/change/enquire 

%* Record sales turnover 
rep. 

* Record purchases 
turnover rep. 

* Adjust stock level 

* Selling price list 

* Quantities on hand rep. 

* Stock valuation 

* Re-order level 

* FIFO turnover eng. 


Each module £49.95 + £1 P&P Total package £179.95 
+ £1.50 P&P. Microdrive 3.5” disk versions 
add £4 per module. 


Each module includes a full manual — Telephone support available 


Eidersoft reserve the right to alter prices and specifications without prior notice. 


TEL: 0708 852647/851099 


ee 
> 
a 
a 
= 
oO 
7) 
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Mitsubishi 
Slimline 


Finish silk black/quad disks available (P.0.A.)/'single 
upgradable disk with any system deduct £50. 


SYSTEM 3 upcrapeE* 


£49 Q 512K extra RAM/Disk 


interface. Toolkit commands. 
All accessories. Twin 3.5 inch 
disk drives as shown. 
*Factory upgraded to 640K — no soldering — includes Securicor collection and return. 


Disk/Software Telephone Support 
Service P.O.A. 


ALL DISK CHARGES INCLUDE OVERNIGHT 
DELIVERY BY SECURICOR 


Eidersoft are pleased to announce exclusive 
x distribution of the Xpert IMPAACT OL 
XPERT SOFTWARE integrated accounts system. 


At last a truly integrated QL accounts package that has 
all the features of packages costing 3 or 4 times the 
price! IMPAACT accounts includes invoicing/sales 
ledger — nominal ledger — purchase ledger and FIFO 
stock control. Each module is available separately or as 
a package. 

* * Fully approved by chartered accountants * * 

* *can be integrated to PSION packages * * 


x x 


Dealers please phone us for more information. 


Eidersoft, The Office, Hall Farm, North Ockendon, Upminster, 
Essex RM14 30H. 
Please supply the following items: — 


DISK/SYStGHI 1: sencwtaxacinevonenag cuales aaeeeemndionan arom eoranwatey £409 
Disk System 2 .......... Scisban ageien angtamenteamn tome tel wanna £449 
=| Disk SYStOIM'S sacesieapesansasanapa coneanasoaneendadaanuadlonne £499 
IMPAACT Sales Ledger.............. £49.95 + £1.00 P&P 
IMPAACT Purchase Ledger ......... £49.95+ £1.00 P&P 
IMPAACT Nominal Ledger .......... £49.95 + £1.00 P&P 
IMPAACT Stock Control ............ £49.95 + £1.00 P&P 
IMPAACT Complete System ....... £179.95 + £1.50 P&P 


*EUROPOST £2.00 WORLD £3.00 
Please deduct my Access/Visa/American Express 


Card No. | | | 7 3 ft 14 oe ie | 
Exp. date Lo 


Please supply more information on 


offer tC we 
to the microdrive 


Speeding up your data access 
with Viglen disc drives means 
instant reliable access every time 


Specially designed to fit neatly into the case of 
the Sinclair QL, the Q-Disc Interface Board and 
companion disc drives are colour-matched to 
compliment your QL computer. 


5Vsinch Drives ‘tsown —_ickinterince 

800K Single drive £119 £229 

1.6M Dual drive £229 £329 

3'2 inch Drives 

800K Single drive £129 £229 
PRICES 1.6M Dual drive £239 £339 


INCLUDE The above drives are compatible and ready to plug in and 
VAT use with all currently available QL disc interfaces. 


When bought with the disc interface they are ready to plug 
in and use — NO EXTRAS. 


Prices correct at time of going to press. Offers subject to availability. 
Even lower prices with other QL interfaces. 


Visit our showrooms 
Open Monday - Friday 9.30 - 6.00 Saturday 9.30 - 4.00 


Unit 7, Tuumpers Way uty Ao 
Hanwell W7 2QA Sa © 


BOSTON 
MANOR 


Carriage 

Please add £12.00 for carriage. Orders are 
usually despatched to you within twenty- 
four hours of receipt. 


Viglen are also major suppliers to educational 


and government establishments and welcome __creat wast ao 
further enquiries and orders re 


— ee eee 
Post to: VIGLEN COMPUTER SUPPLIES. QL12 
Unit 7, Trlumpers Way, Hanwell W7 2QA. 

Credit card holders may order by telephone on 01-843 9903, 


S Please send me 
S 


| enclose Cheque/P.O. forg___ incl. carriage. 
] Cheques payable to Viglen Computer Supplies. 


| Name: 


| Address: 


AJ 


Ze 


| prefer to pay by ACCESS/BARCLAYCARD 
j (delete one). 


Credit Cards valid only 
if signed by card hoider 


i Card No: Address must be the 
, same as card holder 


1 Signature;., = 
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Alan Turnbull, Paolo Baccanello and Simon Craven 


) 

| In the year after the QL’s QL interfaces with many 

1 launch, the two most welcome _ manufacturers opting for the 
add-ons for the machine have | small 8K variety. The chip not 
| been disk interfaces and RAM __ only houses the RAM disk 


| cards. Inthe absence of any __ drivers which link the device 

cheap and reliable _ to QDOS but also support a 

| motherboards for the QL, _ substantial number of Toolkit 

| peripheral manufacturers _ commands and even then 

| have concentrated upon ' comes up with 3.5K spare 
producing ‘all-in-one’ capacity. PCML hint that this 

| expansion units. PCML’s may be used to permit the elite 

] compact Q+ system falls into | machine-code programming 

| this category. set to hook-in their own 


With the capacity tohouse | customised routines. 
both RAM and disk interfaces It should take nobody by 
the unit allows the user toreap | surprise to learn that PCML’s 


the benefits of increased _ firmware has been written by 
processing speeds and more the ubiquitous Tony Tebby, 
reliable storage. Furthermore, creator of QDOS. This means 
greatly enhancing the unit’s _ the floppy and RAM disk 
versatility, the user can driver are guaranteed to be 
choose between a variety of fully compatible with the QL 
configurations and may and that both are extremely 

1 upgrade from one to another _ efficient.Comparative 

| as and when circumstances timings with CST’s interface 
dictate. (also written by Tony Tebby 

Configurations include: and generally held to be one of 


RAM cards with 64K, 128K, the fastest available) are 
256K and 512K expansion _ given below (bottom left hand 
memory; A card with 256K __. corner of this page. 

RAM and 16K utilitiesROM . Asthisis the most recent of 
driver; A floppy disk interface Tebby’s creations the Toolkit 
able to support up to 4 . commands that have gone into 
double-sided double-density it are the very latest. Aside 
5.25” and 3.5” (mixed) disk . from standard file and 

drives, plus 256K RAM and. memory management 


QL Toolkit utilities. procedures which allow for file 

PCML also supply a spooling, random access, job 
compatible 3.5” boxed disk: control and microdrive PCML’s interface and a drive 
drive with power supply and . emulation both on disk and in 
interface cables. RAM, two new SuperBasic formatted and degree of disk interface. 

As the Q+ Disk Interface . extensions put in an verification undertaken PCML have also included 
contains most of the features , appearance. The first, is during access. This should amongst the 11 TTL devices on 
of the other two configurations | WCOPY (wild-card copy) prove useful for those wishing their PCB a 74LS85 as 
we concentrate upon that here. | which enables files with a to use the interface with older, recommended by David 

The interface plugs into similar prefix to be copied slower and lessreliabledrives. Karlin in the QL Technical 
QL’s 64 way DIN connector at | across from one device to Returning to the PCB’s Guide. This ensures a degree 


the left hand edge of the QL. | another inasingle operation. design it should be noted that hardware compatibility which 
When installed it adds 5cmsto . Previously this only applied to PCML have opted for Western quite a few other interface 


the line length and has atits . makingdeletionsorextracting Digital’s 1770 floppy disk manufacturers have failed to 

extremity a standard shugart- directories. controller. This checks the achieve. 

type connector used to link up The other command is disk’s type upon the first In all then, PCML’s Q+ 

to the disk doctor. FLP_OPT. Notentirely new, accesswhichmeansthatthe interface isa product witha 
The unit’s PCB comprises a _ this combines the separate interface can take full definite future. Elegant in its 

mere 22 chips. The most procedures FLP_START, advantage of the faster design, manufactured to the 


interesting of these is a full FLP_TRACK and FLP_SEC _half-height disk drives that highest standards and witha 
scale 16K by 8-bit EPROM into one. These allow the user arebeginningtoappearonthe performance that putsit at the 


which houses the PCML’s . to alter the disk defaults QL scene. front of the pack it is the ‘Rolls 
firmware. This is still _ which set the start-up time, Other points ofnotearethat Royce’ in the QL field and puts 
something ofrarity amongst . number of tracks to be the PCB incorporates 256 by 1 .Sinclair’s own floppy interface 


ere DRAMs and uses a PAL ,to shame. 

chip as a memory controller. 

This has made i possible not FAST BLOWER 

only to reduce the number of —_ Until recently the only way of 
chips on the board but also getting software from the QL’s 
raise the amount of memory RAM onto an EPROM 

that may be supported (‘Erasable Programmable 
(without an external power Read-Only Memory’) chip has 
supply) from 256K to 512K on _ been to transfer the data down 


the basic configuration and the serial line to a special 
from 128K to 256K upon the machine. This process is slow 
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the release of Cambridge 


Microelectronics’ dedicated 
EPROM Programmer card 


things look set to change. 


The card plugs directly into 
the QL’s expansion port, so that 
information is transferred at 
very much higher speeds. It 
will support 2764 (8K) and 
27128 (16K) EPROM’s and 
their ‘A’ variants. The chip to 
be programmed is cradled in a 
zero insertion force socket on 


the card itself. 


The software to control the 
Programmer is held on an 


assess three hardware additions of note to QL users. 


The stylish LX-80 — a departure from the norm 
and tedious. However, with 


on-board EPROM and takes 
some 15 seconds to load. It is 
written for the most part in 
SuperBasic and uses the QL’s 
mode 8 screen display. Whilst 
this is of no immediate 
disadvantage it does give the 
product a rather amateurish 
appearance. Certainly 
rewriting the routines in 
machine code would not only 
speed matters up but also 
allow the user to define his 
own procedures to create, load, 
verify and blow EPROM 
software in one go. 

The facilities offered by the 
programmer are fairly 
standard to such a tool, 
including ‘fast blow’ 
techniques and content 
verification. Indeed 
hardwarewise there is little to 


the Programmer, just an 


derived has started to look old. 
Particular shortcomings 
include the awkward location 
of the DIP switches, which 
need to be reset if you want to 
change the typeface outside 
software control, and the lack 
of a near letter quality (NLQ) 
print mode, to satisfy the 
increasingly finicky 
expectations of personal 
computer users. 

Epson’s answer to these 
criticisms is the LX-80, an 
all-new printer which offers 
considerably more than the 
RX/FX range without 
bumping the price up too 
much. 

The LX-80 maintains full 
software compatibility with 
the earlier models, to take 
advantage of the Epson 


| printer drivers which are built | 


EPROM, 6821 PIA, a couple of | into virtually every serious 


TTL chips and a power supply 
converter. Bearing this in 
mind the unit’s eighty pound 
tag seems difficult to justify. 
But then this is the only QL 
EPROM Programmer so far! 


EPSON LX-80 


For many years Epson 
dot-matrix printers have been 
a mainstay for micro users, 
but despite regular upgrades 
(from MX-80 to RX-80 and 
FX-80), the basic design from 
which the variations are 


| applications program. 

| Graphics routines such as 

| screen dump utilities also 

| work fine with the new 

_ printer. The standard pica, 


elite, condensed, expanded 
and italic typefaces are 


available using the same codes 


as previously, along with 


_ special effects such as 
_underscore, bold, double- 


strike, backspace and 
superscript or subscript. 

The special effects are also 
available in NLQ mode, 


though only one size of type 
(10 cpi) is available in this 
mode. The LX-80 does not offer 
print quality as good as that of 
the bigger, more expensive 
LQ1500 printer, but it 
performs a reasonable 
imitation of an electric 
typewriter as long as you don’t 
look too closely. Speed in this 
mode is better than you might 
expect — about the same as the 
ordinary Epson two-pass 
double-strike printing. 

Internally the new printer 
bears little resemblance to its 
forbears. The most obvious 
change is the ribbon. Instead 
of the hefty, long-lasting 
Epson ribbon available 
virtually everywhere, the 
I.X-80 uses a much smaller 
cartridge. The life expectancy 
of this type remains to be seen, 
but it would be surprising if it 
has as much endurance as the 
older type. 

A major ergonomic 
improvement is that any 
typeface can now be selected 
from the front panel of the 
printer, as well as by the more 
conventional means of 
sending control codes from the 
host computer or fiddling with 
internal DIP switches. The On 
Line, Line Feed and Form 
Feed buttons can be pressed in 
various sequences to set up the 
printer configuration. Epson 
could have made things easier 
still by incorporating 
something like a slider switch 
with the different styles 
marked along it, but 
presumably. it would cost 
more. We would certainly 
recommend LX-80 buyers to 


' copy the table of switch 
| sequences for different 


typefaces and stick it to the 


side of the printer — you don’t 


want to spend the rest of your 
life grubbing about in the 


| manual. Speaking of the 


manual, it comes up to Epson’s 
usual high standard of content 
and presentation, but we 
would still like to see an index. 
The LX-80 is a worthy 
supplement to the Epson 
range, and at £250 (tractor 
unit extra) offers particularly 
strong value for money. 
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‘SYSTEM 


VARIABLES) 


Paolo Baccanello spotlights a useful subset of QDOS 
system variables and isolates some of their applications on 
the almost infinitely expandable QL. 


In every computer there is an area of memory used by the 
operating system to keep track of the many different things it 
gets up to. The QL stores this information directly above its 
32K memory mapped screen. QDOS system variables start 
from address 163840 (decimal) or 28000 (hex). This start 
location is commonly referred to as SV_BASK (ie, Base of 
System Variables). 

The list below describes each variable in turn. Its decimal 
address is given (in column 2) for the benefit of those without 
assemblers who may access a particular variable using the 
commands PEEK and POKE. If the variable is word (2 bytes) 
or long word (4 bytes) size the command should be postfixed 
with _W and _L respectively. For example: 

POKE 163891,1 ... will freeze the screen 
POKE_W 163976,255 . .. will turn Caps Lock on 
PRINT PEEK(163890) ... will display 0 in monitor mode 


a ae ee ce a 


C 


APPROVED 
for use with 
telecommunication systems 
run by British t 
Telecommunications 
in accordance with the 


conditions in the 
instructions for use 


Complete RS232 output for general communications from 
75-9,600 baud with full two-way buffering and flow control. Plus 
all the software on a micro drive to support all 3 modules. The 
software includes Prestel Viewdata/Videotex AND VT100 
emulation, as well as user-to-user communications with error- 
corrected file transfer (with encryption for security) and many 
other features including a telesoftware downloader. 

Connects to the QL's SER 2 port allowing the micro to be 
used with virtually any asynchronous modem and for general 
data communications. 


Q-MOD 


Manual dial V23 modem operating at 1200/75 baud and 
1200/1200 baud half duplex. 


Q-CALL 


Provides traditional pulse/loop disconnect auto-dial and 
auto-answer. 


Prestel and Telecom Gold are registered trade marks of British Telecommunications plc 
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For those with assemblers the Hex offset from SV_BASE is 
given for each variable (column 3). 


Addr 
Dec 
SV_IDENT 163840 
SV_CHEAP 163844 


Name 


SV_CHPFR 163848 
SV_FREE 
SV_BASIC 
SV_TRNSP 


163852 
163856 
163860 


SV_TRNFR 
SV_RESPR 


163864 
163868 


SV_RAMT 163872 
SV_RAND 163886 
SV_POLLM 163888 
SV_TVMOD 163890 
SV_SCRST 163891 
SV_MCSTA 163892 
SV_PCINT 163893 
SV_NETNR 163895 


SV_I2LST 163896 


Hex 
Offset 
00 

04 

08 

OC 

10 

14 


18 
1C 


20 
2E 
30 
32 
33 
34 
35 
37 


38 


Len 


word 
long 


long 
long 
long 
long 


long 
long 


long 
word 
word 
byte 
byte 
byte 
byte 
byte 


long 


Description 


System Identification 
Base of common heap 
area 
1st free space in 
common heap area 
Base of free area 
Base of Basic area 
Base of Transient 
Program Area (TPA) 
1st free space in TPA 
Base of resident 
procedure area 
TopofRAM +1 
Random.Number 
Count of poll interrupts 
missed 
Returns 0 in monitor 
(not TV) mode 
Screen Status 
(0=active) 
Current value of MC 
status register 
Current Value of PC 
interrupt register 
The machine’s network 
number Pointers to: 

.. list of interrupt 2 
driver 


SV_PLIST 163900 3C long... list of polled tasks 

SV_SHLST 163904 40 long... list of scheduler 
tasks 

SV_DRLST 163908 44 long... list of device drivers 

SV_DDLST 163912 48 long... list of directory 
device drivers 

SV_KEYQ 163916 4C long ... keyboard queue 

SV_TRAPV 163920 50 long... trapredirection 
table 

SV_BTPNT 163924 54 long ...mostrecentslave 
block entry 

SV_BTBAS 163928 58 long... base of slave block 

; table 

CV_DTTOP 163932 5C long .. top of slave block 
table 

SV_JBTAG 163936 60 word Current value of job tag 

SV_JBMAX 163938 62 word Highest current job 
number Pointers to: 

SV_JBPNT 163940 64 long ...currentjob table 
entry 

SV_JBDAS 163944 68 long... base ofjob table 

SV_JBYOP 163948 6C long ...topofjob table 

SV_CHTAG 163952 70 word Current value of 
channel tag 

SV_CHMAX 163954 72 word Highest current 
channel number 
Pointers to: 

SV_CHPNT 163956 74 long ...last channel 
checked 

SV_CHBAS 163960 78 long ’ ... base of channel 
table 


COMMUNICATIONS 


SINCLAIR QL 


Thanks to Tandata you can now convert 
your QL into a powerful and comprehensive 
communicating terminal. You can contact 
distant databases such as British Telecom's 
Prestel system, private viewdata systems, 
traditional ASCII databases and electronic 
messaging/mail services such as Telecom 
Gold. You can even replace your existing 


VT100 terminal and enjoy secure . 
communications with other QLs. 


The three smart modules have been 
designed to match the QL in style and for 
added convenience they stack together using 
vertica! bus connectors without the need for | 


interconnecting cables. 


The modules are available separately, 
but by using all three as a complete matched 


Tandata Marketing Limited 


Albert Road North, Malvern, Worcs. WR14 2TL. 


Telephone: 06845 68421. 


Tandata femme 


Telex: 337617 Tandat G. 
Prestel *799# Telecom Gold 81: TANOO1 
Asubsidiary of Tandata Holdings plc. 


system full advantage can be taken of the 
integrated features of the Q-CONNECT's 
software. 

If you'd like to know more, simply 
complete the coupon. 


ri, d like to know more about 
| Tandata communications 
| for the QL. 


| Name 
| Address 


Tel No 


QLi2 


eg npn gi eg eee 


Send to: 
Tandata Marketing Ltd., 
| Albert Road North? Malvern, | 
i= Worcs. WR14 2TL. 
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John Lambert constructs a 


bridge to link Masterfile on the 


Spectrum with Archive on the QL. 


Where processors differ and com- 
puters run entirely different soft- 
ware, you’d expect the task of trans- 
ferring vital information from one 
computer to another to be fraught 
with problems and take days, if not 
months, to complete. However, 
where Masterfule, the definitive 
database for the Spectrum and 
Psion’s very much more powerful 
Archive for the QL are concerned 
problems are easily surmounted and 
the transfer of large amounts of data 
is reduced to a matter of minutes. 

The process of transfer from 
Spectrum to QL can be broken down 
into three distinct parts. First, we 
need to find out how to physically 
link the two machines together. 
Next, we need to sort out what we 
want to send across and the form in 
which it is to be sent. Finally, once 
information is on the QL we need to 
know how Archive can use it. 

The first part is the easiest. 
October’s Spectrum Connections 
article provides a clear indication as 
to how to go about matters. However, 
for the benefit of those without the 
‘official’ Sinclair RS232 lead with its 


colour coded wires Figures 1 and 2 
provide pin connections for wiring up 
to serl and ser2 respectively. Our 
‘standard’ RS232 lead connects up to 
a 25 way DIN plug. At the QLend pin 
1 is the one farthest from the QL’s 
plastic foot. 

For those who would rather not 
resort to a soldering iron a ready- 
made lead is available from Clas- 
sified Products and Services. If you 
buy a bespoke lead, note that the list- 
ings given here use ser2 so that a 
printer. may be connected up to the 
QL during transfer. To adapt them 
for serl simply change all occur- 
rences of ser2 to serl. 

Once we have physically linked up 
the two machines we can tackle the 
second and most difficult part of the 
transfer process — that is how to get 
our data across to the QL in a form 
palatable to Archive. 

Fortunately, Archive is blessed 
with the ability to Import and Export 
files between it and the other Psion 
programs. As the other Psion pro- 
grams do not need most of the gar- 
bage in a standard Archive file, an 
export file is simply laid out. Fig 3 
shows what this file would look like. 
(This, incidentally, looks very much 
like a dBase II file which raises some 
interesting possibilities.) 


"names", "address$", "phones", "contacts 
", "notes" 

“QL User","Priory Court!30-32, Farrin 
gdon LaneitLondon!ECiR 3AU","01-251-62 
22","Paul Coster","Buyer of articles" 
"Transform Ltd.","24, West Oak!Becken 
hamiKent!BR3 2EZ","01-658-6350","","S 
upplier of this program" 

"Classified Products & Services Ltd." 
2"St. Cuthberts House!Aycliffe Indust 
rial Estate!Newton AycliffeiCounty Du 
rhamiDLS 6UT","0325-313131","", "Cable 
suppliers £4.68" 


As an Archive export file can be 
Imported straight back into it, so the 
Spectrum side of the program is 
designed to generate exactly such a 
file. This again is quite easy using 
the User Basic facility of Masterfile, 
although you will need a version 09 
Masterfile or later to do it using this 
remarkably easy method. 

Listing 1 needs to be added to a 


All other pins no connection 
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jivrenrace 1] connecYor | SER2 | 
Fin | [Fn [ Sia 


fenracey| sent] 
[Signal | Pin | Pin _| Signal 


All other pins no connection 


SPECTRUM 


copy of Masterfile. The simplest way 
to do this is to load Masterfile in the 
normal way and then to execute User 
Basic, by pressing [U] then [Y]. So 
long as you do not already have any 
User Basic in the program this will 
do absolutely nothing. (If however 
you have a lot of records selected, it 
will take a long time doing it!) 
Simply press Break when it beeps at 


LISTING 1 


4500 REM Masterfile to Archive 

4510 REM Transfer Program - Spectrus 

4528 REM (c) 1985 John Lambert 

4908 FORMAT “b";9688: OPEN #3;"b" 

4918 LET t$=""s RESTORE 4998: READ ¢ 

4920 FOR c=1 TO #: READ i$: LET t$=t$+i$(1) 
4938 LPRINT CHRS 34;i$(2 TO );CHRS 34; 
4948 IF c<>¢ THEN LPRINT ","; 

495@ NEXT c: LPRINT CHR$ 10; 

4968 60 TO USR r 

4998 DATA 5,"Nname$" ,"Aaddress$", “Pphone$" ,“Cconta 
ct$","Xnote$" 

3008 DIM r$(# 128) 

5018 60 TO USR r 

6008 FOR c=i TO f 

6018 IF c$(1)=t$(c) THEN LET r$(c, TO )=c$(2 TO ) 
6828 NEXT ¢ 

6038 60 TO USR r 

7008 FOR c=1 TO ¢ 

7018 LET if=r$(c, TO ) 

7028 60 SUB 9588 

7038 LPRINT CHR$ 34;i$;CHR$ 343: IF c<>¢ THEN LPRI 
NT ","; 

7048 NEXT c 

7058 LPRINT CHR$ 12; 

7068 60 TO USR r 

9008 LPRINT CHR$ 263: CLOSE #3 

9@1@ BEEP 1,8: 60 TO USR R 

9508 FOR s=LEN i$ TO 1 STEP -1 

9518 IF i$(s)<>" * THEN GO TO 9538 

9528 NEXT s 

9538 LET i$=i$( TO 5) 

9548 RETURN 


you and type in the listing. When you 
have finished enter as a direct com- 
mand GO TO USR r to get back to 
Masterfile. Now is a good time to 
save Masterfile as the program can 
get confused if you made a mistake 
when entering the listing. Press [V] 
for save and then [P] for program. 


Variable Format 


As everyone has different uses for 
Masterfile it is not possible to give a 
definitive method of transferring 
records. Every Masterfile file will 
contain different fields which mean 
different things. The same, of course, 
is true for Archive and any other 
database for that matter. 

For an example we have used a 
simple file that contains five fields 
stored in Masterfile as N, for names, 
A addresses, P telephone numbers, C 
contacts and X for general notes. 
These appear in a DATA statement 
at line 4990. 

The number at the start of the line 


is the number of fields to be transfer- 
red, and each field name is stored asa 
string. The first character in the 
string is the Data reference used by 
Masterfile, which must be a capital, 
and the rest of the string is the field 
name to be used by Archive. All fields 
are transferred as strings so all the 
Archive field names must end in a 
dollar sign. If you have any numeric 
fields these will be dealt with later. 
You do not have to transfer the 
whole file in one go. In this example 
you could have a data statement like: 
4990 DATA 2,‘“Nname$”’’, 
“Pphone$” 
So long as the number of fields you 
want to transfer is not more than the 
number of fields in the file you will 
not have any problems. The fields 
will be transferred, and so appear in 
Archive, in the order that they 
appear in the data statement. Only 
selected records will be transferred. 


Custom Code 


As you may well want to customise 
the listing for your own uses a brief 
explanation is in order. When User 
Basic is executed control passes ini- 
tially to line 4900. This opens the 
RS232 channel, sends the field 
names and creates ¢$ which holds the 
Masterfile Data references. Control 
passes to line 5000 once for every 
record and the array r$ is created, 
this has the added bonus of effec- 
tively clearing it every time the line 
is called. Line 6000 is called once for 
every field in a record. Fields, and 
records, are stored in Masterfile in 
date order, that is, in the order that 
you typed them in or made any alter- 
ations. Each field is put into r$ in its 
correct place. At line 7000, at the end 
of each record, the fields are stripped 
of trailing spaces and sent. Finally at 
line 9000 the channel is closed. 

As listed the program takes up 
roughly 650 bytes. Each field takes 
up a further 128 bytes and so for this 
example you would need about 1300 
bytes free. If you do not have this 
much spare then you could either 
compact the program by using mul- 
tistatement lines and changing each 
number to the VAL“number” or by 

-transferring the file in two halves 
and then merging them. 

Before going any further it is a 
good idea to test the program. Enter 
on the QL, COPY SER2z to SCR_, 
select half a dozen records on Master- 
file and execute User Basic. With any 
luck you will see the file appearing 
on the QL screen. If not take a coffee 
break, or whatever you think suit- 
able, and check that you have 
entered Listing 1 correctly. 


Assuming everything works enter 
Listing 2 into the QL and save it. 


LISTING 2 


100 ReMark Masterfile to Archive 
110 R&Mark Transfer Program - QL 
120 REMark (c) 1985 John Laabert 
130 OPEN_IN #4, ser22 
140 OFEN_NEW #5,adv2_teap_exp 
15@ REPeat loop 
468 IF EOF (#4) THEN EXIT loop 
170 a$=INKEYS (#4) 
168 a=CODE (as) 
190 SELect ON a 
208 =10,32 10 127 
210 PRINT 85,a$; 
220 END SELect 
238 END REPeat loop 
240 CLOSE#4 
258 CLOSE #5 
Before you actually transfer your file 
there is one final problem to consider. 
Masterfile uses the ‘| ’ character to 
force a new line when displaying a 
field. This is meaningless to Archive 
but it must be transferred along with 
the rest of the file regardless. There 
are two things you can do, the first is 
to add the following lines to Listing 2 
which simply replaces all ‘ | ’ charac- 
ters with a space:- 
200  =10,32 TO 123,125 TO 127 
212 =124 
214 PRINT 45,“ ”; 
The second is to write an Archive pro- 
cedure that splits a field over a 
number of separate fields so that 
they can be displayed over a number 
of lines. Listing 3 is an example of 
this and splits address$ over four 
fields. If you use this remember that 
there may be ‘ | ’ characters in other 
fields that have to be dealt with. 
Now you can transfer the file. Run 
the QL program and then just exe- 


proc copy 
rea Copies File ¢ to £2 let #2.note$= 
Create “file2" logical “f2" use "2" 
naaes append 
ad1$ use “f" 
ad2$ : next 
ad3$ endwhile 
ad4$ close “f" 
phone$ close "2" 
contact$ endproc 
notes proc expand 
endcreate 


return 


open “file" logical “#" 
use "f* else 
first let a$=f.address$ 
while not eof () fill 


let 2.name$=#, names let f2.adis=#$ 
let f2.adis="" fill 
let £2,adz¢="* let #2, ad2$=#$ 
let #2.ad3$="" fill 
let £2.ad4s="" let #2, ad3$=#$ 
expand let #2. ad4$=a$ 
let £2. phone$=. phones endif 


let #2.contact$=f.contact$ 
notes 


if not len(f.address$) 


cute User Basic on the Spectrum. 
Depending on the length of file this 
will take a long time, up to an hour 
for a long file, but at least you only 
have to do it once. 


Internal Disk 


If you have a RAM disk facility on 
your QL you can save a lot of wear 
and tear on the microdrive, just add 
the following lines to Listing 2 
1385 FORMAT RAM1_100 
140 OPEN_NEW #5, 
RAM1_temp 
260 COPY RAM1_temp to 
mdv2_temp_exp 
Once the file is safely tucked away on 
cartridge and backed-up at least once 
transforming it to an Archive file 
takes no time at all. Load up Archive, 
put the cartridge in MDV2 and enter 

IMPORT ‘mdv2_temp_exp’ as 

‘file’ 

CLOSE 
and Archive does all the hard work. If 
you now directory mdv2_ you will 
find two files, temp_exp and file_dbf. 
Easy wasn’t it. 

If you have fields that are numeric 
adapt the copy procedure and use a 
line such as 

let f2.number=VAL(f.number$) 
to make a backup copy of the file. 

Finally, if all of the above seems a 
bit much or you want to transfer a file 
and do not have the necessary 
hardware Transform Ltd., 24, West 
Oak, Beckenham, Kent BR3 2EZ (01 
658 6350) can do it for you. 

QL to Interface 1 leads can be 
obtained from Classified Products & 
Services Ltd., St. Cuthberts House, 
Aycliffe Industrial Estate, Newton 
Aycliffe, County Durham DL5 6UT 
(0325 313131). ° 


endproc 
proc fill 
if not len(a$) 
return 
else 
let p=instr(a$,"" 
if not p 
let f$=a$ 
let a$="" 
return 
else 
let f$=a$( to p-l) 
if p=len(a$) 
let a$="" 
return 
else 
let a$=a$(pti to ) 
endif 
endif 
endif 
endproc 
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CLASSIFIED 


Q-PROM amo micretectronesis. £69.95 
EPROM PROGRAMMER 


Resident software, Vpp generator and ZIF socket. Fits ex.port. CHECK, READ, 

BLOW, Fast BLOW, VERIFY, CRC-8K, 16K Q-CART EPROM reader £5.95. 

DemoEPROM £4.95. DHOBI-2 EPROM eraser £22.95. Alil prices + VAT. 

Pgm’rs also for BBC, C-64, Spectrum, ZX81, Gang pgm’r, etc. DELIVERY by return. 
CAMEL PRODUCTS, One Milton Road, Cambridge CB4 1UY 

Tel: (0223) 314814 Telex: 81574 


DESIGN-BOARD 
The ultimate in QL art & graphics 


Design boards unique on screen X.Y pixel co-ordinates and an on screen 360 
degree graphic angle and turtle direction indicator makes drawing and painting 
- screen designing — Technical drawing and program planning so easy, and 
eliminates old trial-and-error methods. 


GRAPHIC-DESIGN FEATURES INCLUDE: 

On screen X.Y pixel co-ordinates. 

2 grid overlay options (10x10 and 2x2 pixel) 

360° on screen graphics and turtle angle indicator 

4 sizes of text can be mixed with graphics 

Continuous line drawing 

2 Image_designers 

Free hand drawing and painting (3 brush sizes) via Cursor keys 

Single keystroke commands include, Box — Triang & Triangle — Circle — 
Move, Line & dotted-line — Arc — Ink (full colour range) — Fill— Paper—Turnto 
- Grid — Point — Print-At — Size 0.1.2.3 — Ellipse — Wavey_line Image_ 
designer — Under — Scroll — Pan — Pentagon — Hexagon — Octagan 

* All images can be drawn to any angle on screen 


TEXT-SCREEN-DESIGNING FEATURES INCLUDE: 

* On screen row and column co-ordinates, interchangeable for 4 different 
text sizews, allowing easy design of varied text screens. 

* Single key stroke commands include, Ink — Paper — Size 0.1.2.3 — Print At 
— scroll — Under 

ALSO: 

On screen command index and colour-sampler. 

All screens can be saved to microdrive. 

Commands, co-ordinates and image-design procedures listed to printer in QL 

basic for easy inclusion into own programs. 

Operates in high and low resolution modes. 

No computer or typing skills required to operate. 


Send cheque or postal order for £14.95 payable to: 


Micr_A_Soft 


at 134 Hardy Mill Road, Harwood, Bolton BL2 3PJ 
Telephone 0204 29643 


EVERYONE WITH A QL NEEDS DESIGN-BOARD 
Programs and freelance programmers urgently needed 


et 


* 
* 
* 
* 
* 
* 


curry computer 
Your Complete QL Stockist 
Hardware, Software, Peripherals, 


Printers, Books, Magazines, Accessories 


5344 W. Banff Lane @ Glendale, AZ 85306 U.S.A. 
1-602-978-2902 © Telex (via WUI): 6501267701 
DEALER INQUIRIES WELCOME 


PReSTEL| QQChLODE 
agra MODAPTOR enables QL to be used with almost any 
1200/75 or 300/300 Modem, includes software for 
access to PRESTEL, MICRONET and Bulletin Boards, etc ............... £39.00 
FOUR GAMES on one microdrive cartridge (2 M/c code) — 
Sprite Shoot, Lander, Moon Landing, Wall-up.....0..........0..0ccccceeea ee £4.95 


ASSEMBLER/FULL SCREEN EDITOR with fast M/c linker............. ve £12.95 


Please send me: 

Modaptors with Software @ £39.90 
..Games Cartridge @ £4.95 
Assembler/Editors @ £12.95 


Cheques payabie to QCODE 


QCODE, 42 Swinburne Road, Abingdon, Oxon 0X14 2HD Tel: 0235 28359 


QL DUST COVERS 
£2.50 


Quality black vinyl 


rer 
XMAS oF Send cheque/PO to: 
Comtel 


3 Mount Havelock, Douglas, Isle of Man 


path BE i INDEX 


ABC Electronik 


Cambridge University Press 
Classifieds 


Compugem 
Compware 
Cumana 


Digital Precision 


Eidersoft 


Medic Datasystem 
Metacomco 
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Shadow Games 
Silicon Express 
Strong Computer Systems 


Talent 

Tandata 

Technology Research 
Techsoft 


New - a professional specification C Compiler y 


igned b LATTICE *, 
ee QU Designed ay ation ofthe | QL PASCAL £89.95 we vex 
vem han and Ritchie definition of C.QLCIS | pascal compiler which conforms fully to the ISO 7185 
ene by Sinclair Research; it is the most international standard. Approved by Sinclair Research. 
see PE fully featured C compiler Features: fast single pass compilation — no inter- 
powerfu 


mediate stages; produces native 68000 code; full 
available for the QL. ISO 7185 level 0; direct addréssing of complete 
: itchie QL address space; easy to use QDOS interfaces: 
> Complete oo. and R very large sets and arrays. 
implementation. 


i tible 
LATTICE ® design, compa 
= ante LATTICE’ compilers on IBMPC, etc. 
> True compiler producing native 68000 
code. | | | 
~ Full floating point arithmetic. — 
~ Powerful data types such as pointers, 
arrays, structures, and unions. i 
> Comprehensive library of UNIX, Q 
and utility functions. 
> Over 90 detailed error messages. 
> Separate compilation. 
> ers conditional compilation, and 
other pre-processors. | 
i les; will also 
inker to link program modu 
% fk i other relocatable binary modules. 
> Chosen by Sinclair Research as the C 
Compiler for the QL. 


= 


ASSEMBLER — £39.95 nc vos 


A high specification macro assembler supporting 
the full Motorola instruction set. 

Features: external references; absolute, position 
independent, and relocatable code; linker; precise 
error messages; formatted listings; macro expansions; 
conditional assembly; and a large range of directives. 


BCPL £59.95 vc 


A true compiler, ideal for systems programming - 
writing utilities, games and applications. 
Features: generates native 68000 code; run 
time library includes easy QDOS interfaces; link 
loader links separately compiled segments; 
‘modules can be linked with Pascal or Assembler. 


LISP | £59.95 ssc. vex 


ALISP interpreter for exploring “The language 
of artificial intelligence”. 


Features: Turtle graphics; compatible with LISP 
for the BBC micro; full support of QL features; 
structure editor; prettyprinter; garbage collector 


and tracer. 7 
Ring or write for details! 


Every DEVELOPMENT KIT includes Metacomco's 
popular screen editor, and a detailed manual. All 
KITs will operate either on a standard QL or else 
| using QL peripherals such as floppy disks or 

| memory expansion. 


Available from W.H. Smith, John Lewis, HMV, 


; ae = Ao SET =e Zs SSS 
Menzies, Dixons and other leading retailers or I Phone today or post this coupon to: Metacomco, 26 Portland Square, Bristol BS2 8RZ. 
direct from Metacomco. Please send me QL C £99.95 CQL PASCAL £89.95 1 ASSEMBLER £39.95 KBCPL £59.95 0 
z | LISP £59.95 ] MORE INFORMATION 11 enclose a cheque for £ ______ or debit my | 
m a Cy U Ce ACCESS/VISA No: L_L_] LTT] | Card Expiry Date 
NAME 
26 Portland Square, Bristol BS2 8RZ. ADDRESS 
Tel: Bristol (0272) 428781 | = SIGNATURE | 
Trademarks UNIX-AT+T Bell Laboratories, QL, QDOS - Sinclatr Research Limited POSTCODE TELNO 


| Price includes VAT, postage and packing UK mainland only Delivery, allow up to 28 days 
= a Ss ee a ae 


QL 11 | 
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A complete Forth-83 Standard Forth Compiler with many extra commands 
independence, 


400% integrated with QDOS (supports windows, device 


Graphics, Sound, Peripherals etc). 

*Ultrafast operation (much faster than any other QL Forth) — for example, 2 Sieve 
of Erastothenes program taking 3 minutes 30 seconds in SuperBASIC takes just4 
seconds in SUPERFORTH! +32 bit operations supported. *Eull floating point mat! 


operations (Log, Trig, Exp included). *{ntegrated full screen editor. *Multitasking 
(demo on cartridge) With full job control : ap 
coresident programs. *Suits both ATH experts and people who know no & - : e 
FORTH at all (we do NOT require you to buy 4 separate FORTH guide). *Can be z= : Bice Renum which are specific to BASIC and would be meaningless in mat 
r task. *Uses files in standard FORTH t handling, multidimensional arrays. procedures (with oF without parameters). coercion, iteration, 
4 : local variables, expressions (without \imitations), device independence, all display modes, 


£59.95 COMPLETE WITH DETAILED MANUAL (specify cartridge oF CST diskette) 


This amazing Compiler transiates au SuperBASIC into 


run concurrently with BASIC or any othe 
block format. Interactive debugging and error handling. Comes with a superb : : ‘ . 3 Oratigent sting oe aisons ve ris eae er nbe, StS. ed graghics, 
40,000 word user manual. 3 2 windows, intelligent printing, separate superspeed integer and floating point arithmetic (displaying 
PLUS 9 digits of precision ys the interpreter’s 7). extensions {0 BASIC, the complete range of SuperBASt 
contral constructs .  » Refer to your OL User guide for the whole {ist! Virtually nothing 1s left out 
REV ERSI Most programs (either your own of commercially available ones) will SUPERCHARGE without any 
Probably the strongest computer version ever produced, for any computer in the modifications whatever if modifications are needed, they tend to be quite trivial- SUPERCHARGE'S 
world. Guaranteed to defeat Sinclair Reversi every time when the two are played A COMPLETE FORT error messages will tell you exactly how t0 make them. 
FOR THE SINCLAIR QEC *The code genetated by SUPERCHARGE runs incredibly fast - here are the standard PCW 
ared with the timings {or the same programs when 


on similar levels! 
UPERFORT H — the well-written Benchmarks (PCW June 1984) for OLBASIC comp! 


This superb program (written entirely in S| 

FORTH-83 Source Code ig supplied for you to study) has nine levels of play, SUPERFORTH 4 REVERS! 

(instantaneous response at levels 1 and 2) and lots of features — Exchange side, £29.95 WITH EXTENSIVE MANU a BENCHMARK NUMBER Bhs ate se ges eee cas 

Retract Moves, Setup Position, Display move Evaluations, Resign, etc- etGa- 7d 9b it ordere 3 together SUPERBASIC ai, 64 407 103 132 26.1 81 g 258 
SUPERCHARGE (Integer) 006 0 03 «(03 a3 071 o N/A 


pruning and a killer heuristic. with SUPERCHARGE 


Spectrum: BBC, IBM PC oF Reversi V1 3 is also available on Its own Speedup Factor (Integer) ax 84x 36x 34x ax 37x pax N/A 


The program uses alpha-beta tree searching, with 
64 


* We are yet to find any program (for the QL, CO", 
upwards) capable of beating SUPERFORTH Reversi — or any human capable 0! (without SUPERFORTH) including full 
ghest skill level! Dare you accept our challenge f SUPERCHARGE (Floating Pt) 02 03 1 og 10 25 41 88 


devastating Reversi ever (it beat the Spectrum 
supervised match!!). 


2 Thisis the most instructions — Price £1 
3x 10x 1x ox 


champion, MO! Othello, 10-01n a Speedup Factor (Floating Pt atx Zin eee 


Timings performed on SUPERCHARGE at 7.8.85 SUPERCHARGE js subject to continuous 


revisions, refinemen 
substantially better than 

on standard benchmarks @ speed increase of over sixty tl 
SUPERCHARGE. 's at it’s least impressive when compiling short programs like 
SuperBASIC grows slower as program size increases while Su 
unaffected. Speed improvements of SEVERAL HUNDRED TIMES are in no Way uncommon 


when using SUPERCHARGE on programs of average size! 


*SUPERCHARGED programs are relocatable and are inherently multitasking (so you can 


run any number of them at once). 


*SUPERCHARGE optimises aS it compiles ~ and the advanced user may switch the 


optimisation from time-optimal to space-optimal ona statement to statement basis This is@ 
unique feature. The beginner may ignore it~ SUPERCHARGE will then intelligently guess 
how to optimise. 

*SUPERCHARGED programs \oad far more quickly (5-10 times, usually) hence, reliably thar 


normal SuperBASIC - there is no pause between blocks. 
*SUPERCHARGE is very easy tO integrate machine code programs with SUPERCHARGEL 


ones. 
*S\PERCHARGE can compile programs of virtually any size, provided you have enoug! 
RAM on-board (for the unexpanded QL, the limiting source code size is still massive 


*SUPERCHARGE provides @ complete set of compile-time and run-time error message 
ar, unambiguous and in plain English) showing exact error locations (line, statemen 


nt!) 
5 and procedures are allowed by SUPERCHARGE, provide 


they do not read/alter interpreter data structures . . - Note that extensions which ust 
debugging aids, of no interes 


interpreter data structures are almost exclusively & iting/ 
whatever to the SUPERCHARGE user Hence utilities supplied with disk systems and 
Toolkits will work with SUPERCHARGE. 

*SUPERCHARGE is compatible with all. disk and memory-expansion systems. Th 


system We recommend {on rounds of quality, speed and reliability) is the one we use 
sk system, available from Computamat 


di i 
(Scotia Road, Burslem, Stoke-on-Trent — Tel. 0782 811711) oF from us - write in fe 


*SUPERCHARGED programs are rotected against unauthoriset 
vnodification/listing/tamperin ~ permanently and conclusively. 
*SUPERCHARGE ig the only QL compiler which offers the user the convenience 0 


fully interactive testing, editing and debugging via the interpreter. 
*S\JPERCHARGE fixes major bugs cures anomalies and lifts many of the restrictions 
imposes by the interpreter xamples of problems completely cured oe 


CHARGE: the “Too many parameters in a procedure ug; th 
bug, the “GOSUB in a single-line FOR statement” restriction, the "CALL in long 


powers bug, the procedure parameters/integer/std variables used in 


Impr i 

eee ae de rewritten. A top flight, feature packed 68000 

Disassembler —allin 10 Sse integrated with a full Motorola Standard oe ee alee i“ 
in 100% Machine code. The entire system occupies 


an incredibly small 8.5K — unbelievable compactness! 


Thi i 
ie ee allow you to test, debug, check and correct an 
Sane 2 DTON a a cs wt the operation of aoe 
date -ar uct is written in entirel 

ine code and, occupying very little space, can Pe Bae 


& 
hee e time as you other progra s(B \SIC and mac e code) a d 


Features include Edit/Jum 
p/Execute/Out i 

os put to any d 

sh eraargeloure ce et es 
coe omen either + Modulo arithmetic/List/Set_ + Cancel 
eheaies ee eee a + Output of Ce BASIC/BACKUP 

i _ Any ase Number © i i 

Instructions/User Defined Screen Layout, Size a ae 


through RAM + ROM/Alter i 
a= 18) i 
to non-default channels, Single pi eS i 


THE QL SUPER 
= MONITOR 


SPECIAL OFFER! 


Send igi . 

send us the orginal cai oY OSS raps 25 and we 
te) et 

post you the latest version (no strings Ue ie ee an weil 


CHRISTMAS SPECIAL! 


| ae ae 
Ua meee ae £1 off if you buy two programs £2 if you 
ee ie ae Saas, you buy four programs and so on! This 


‘ogra mers — We p 

ly eX! g 
Pr ram r ay excelle t oyalties ‘or good 68000 so tware 
ort e QL, Atari, S and Amiga co puters DEALERS—P one us now 


All Digital Precision i mi h m mi 

' = | a i ee is compatible with Computamate Medic. Quest and 
: : , : 

to the diskette Is simplicity itself. ‘ ue Eee wee ia 


THE COMPLETE ee 


COMPILES R 
al SUPE A SUPERB BUY AT JUST £24.95 INCLUDING DET. 


AILED MANUAL 


GER The definitive character readi 
\ l 1 eading and personality deli i 
pStR' ) esceioat ete and for sceptics .. . You ne 0 
te ge oO} astrology to use this superb piece of software a 
y te anc code program was produced by a professional 
pares oe bees with an astrologer and with reference to 
8 the plese Ss on modern astrological techniques. Only fools 
SS ror t oe ae - rubbish — try and see how astrology 
ee ied eae y- e do not profess to know why astrology 


th time or date, and any location 
a detailed readout, with full 


: r t to learn still m 
progression aspects are automatically displayed to give the eee 


es oats : : 

c Tee Sheree - As future. Also, there is a special 
e' 

partner(s)?!) and compatibility testing. ‘Sar i eleas aes ae 


provided for Prince Char eee personality readouts are 
people. jes and Princess Diana and 20 other famous 


There 

thts alee extra features — automatic calculation of sidereal 

a Suen fecha Se rol houses, 2 real distance-from- 
rth cal , ) r system with exact planet iti 

trajectories (with fully variable magnification) at He aime (ie 


*SUPERCHARGE adds a library of new commands to SuperBASIC, including ones to monitor device 
i T 


statuses, 10 list/stop/remove tasks, to change task priorities. and so on. These tasks can be either past aie ( 
SUPERCHARGED code or programs in any other language. or future), printer drivers. . present, 
*SUPERCHARGE ig supplied either on CST BY" disk oF On microcartridge, and can be easily natal chart, etc. etc. Aunique a ST ae full display of the 

i \ per Astrologer allows the 


oe Sen - et - Hecate) the horoscope text files (1.e.; 
' f ‘ \ stomise it to his requir ith the 
‘ext editor that Is supplied! Over 1 OOK of text files Seed ae 6 4 


single spaced A4 pages of character delineation — qu 


~snsferred/backed up from one to the other. Run It from disk for maximum convenience 

*SUPERCHARGE does not abandon compilation on detection of an error itdetects ALL the errors in 
Q d reports them to you (you do not need to run itover and over again to fix all the bugs). 
numbers flash up as they are scanned at compile time, sO you know how far compilation has 


ite amazingly 


with the same console windows as they had under SuperBASIC detailed. 
There is much mo 
i i i re to astrolog than j i ? 
ys errors which the interpreter misses oF misdiagnoses (@.9 Astrologer en ly than just signs of the zodiac — Q 
log ables you to obey that a i i jac - QL Super 
ncient edict ... Know Th 
vi yself. 


snctions without RETURNS). 
~SUPERCHARGE always checks parameter values and array subscripts 4S programs run, so that 
programmer error does not produce mystifying effects. The checking mechanism is much more efficient 


s 

*extensions t0 SuperBASIC are loaded poth at compile time and run-time. if you make 3 mistake, 
S JPERCHARGE automatically displays @ complete list of procedures of functions that it needs but cannot find 
— what more could you want! 

*Programs can be SUPERCHARGED on any OL (any version!) and run on any OL (any version!). This includes Sa COMP LETE 
versions AH, JM, JS and MG!! 

“The interpreter tends to require larger and larger memory 8 it runs (due to fragmentation — the interpreter 


-ontinually allocates space and rarely deallocates it). This has catastrophic effects on long running programs. 
3y contrast, SUPERCHARGED programs do not “creep. 
4. SERZ, CON, SCR, NET, printers. modems, keyboards, microdrives, floppy L 


*SUPERCHARG! 

Zicks, hard disks, Ww you need. 

*SUPERCHARGE its ally fast - Yes. SUPERCHARGE Is itself a SUPERCHARGED 

The compilati ry rapid ¢ O Nl 
ARGE is suppl M pages) designed to complement the iol 


at the SUP 


from SU 
‘eference Section. 
SUPERCHARGED programs 
so 


out th 
Juding VAT). 
ff sl 


copyright. 
use at differe 
need Site-Licences ~ only Software Houses. Note 


> PERCHARGED programs are made. 


Author: Simon Goodwin Assistant: Gerry Jackson. Mission Control: Freddy Vachha. 


“Simply excellent” (QL Uset. June 1985) is what they wrote about ? 
( 4.0! Superspeed Sprite Compiler, Sprite Management FOR THE SINCLAIR QL COMPU 
e Machine Code Sprite Creation Editor, a Library of 


games «= 

absolutely N° machine code knowledge at 2 

automatically for you! 

This is what Version 2.0 offered: 

*Easy drawing and amending of multicoloured sprites: *Up to 16 

different sprites On screen gimuttaneously: “Each sprite can have upto 

46 different shapes “frames” fOF animation. UP to 256 different = — = — 

kanes to control depth of movement i i isi a A Sinclar, OL & SuperBASIC are all trademarks of Sinclair Research ad (OWT HERE 
ite (with | 


detectio”: poth Sprite-Sprite dentity) and Sprite-Object. “Sprite \ 40 SA PRECISION 


Reversal. *Sprite Inversion. Comprehensive diagnostics with run= 

time error trapping and exception-processing systems: *Ultra high \ 

s eed action — is) speed the motion is faster than the eye can see \ 

#100% Variable SPe3k. eo) control from within YE program, us" To: Digital Precision, 922 The Avenue, Chingford, London E17 SRY 

SuperBASIC Keywords. Library of preprogrammed sprites. Easy to \ 

use. “Full instructions oes pil processes a ae a Please rush me SUPERCHARGE/ SUPERFORTH + REVERS!/ REVERSI 
flowcharted for clarity. ltra large sprites possible: *Eyi| over/under 

nit/miss logic: *Ereeze Control.” Automatic Screen Bordet Detection. SUPER ASTROLOGER SUPER ARCADIA/ SUPER SPRITE GENERATOR V3.0/ 
*Backup COPY: *Full Setup/Gonnect/Extend/ est/Reply facilities: \ SUPER MONITOR DIS. ASSEMBLER V3.0 /SUPER BACKG AMMON V2.0 

*Solid + “Ghostly” sprites and much, mu more. “All you need 10 \ Siena eaectne UK 
know about accessing the system poth from SuperBASIC and 68000 \ enclose 2 cheque for £ Post free W' \ P 
machine code gupplied withthe SYST | orders from Europe add £1 (£2.50 for SUPERCHARGE) Per program: from outside 
Now Version 3.0 nas ALL the features of Version 2.0 25 well 4s: \ Europe the figures are $4.50 (£4). 


* amazing, incredible, guaranteed truly 100% Flicker Free operation: 

*Choice of Wo screens. Upto 256 sprites in jotal. “Choice of automatic \ Name: 
sprite drawing 17 the background: “Choice of automatic sprite | Address: 
movement. * Ability {OF each sprite to move at its own independent speed . 


irrespective of the spee of other sprites: *pij work done by new \ 
_ Keywords. “Revised, enlarged and improv documentation: 
£74.95 coMPLETE WITH EXTENSIVE INSTRUCTIONS 
orei93e Forderes WED: SUPERCHARGE: fhe SuperBasi€ Campues \ Orders by Access & Barclaycard are most welcome - 


\ either write in quoting your card number oF phone 01-527 5493. 
Please charge my AccessL ) vsALl (please Sk appre spneate BOX) 


CardNo.|_|-} ++—— 


ec pwrrmyy 
du soft en francais pour le QL! 


Le jeu de réflexion bien connu (appelé aussi jeu de GO) est maintenant disponible pour votre QL ! 
MS Mor ions Arriverez-vyous a4 aligner cing de vos pions avant votre QL ? Les paris sont ouverts ! Taille du 
- Pp damier variable de 9x9 a 19x19 et deux niveaux de difficulté. Vous verrez comme il est coriace ! 
0 : Le célébre jeu qui a inspiré les organisateurs du tournoi annuel de 1'Ordinateur Individuel tourne 
= thello aussi sur le QL, et de plus en trois dimensions ! Un jeu simple 4 apprendre, mais tres dur 4 gagner. 


Notre programme de DAO (dessin assisté par ordinateur). I1 vous permettra de créer des images a 
l'aide de figures primitives, parmi lesquelles on trouve les cercles, les ellipses; les triangles, 
. les rectangles, les arcs de cercle, etc... Tout est géré a l'aide d'un joystick (ou avec les 
omana. aint curseurs) : le positionnement de la figure, sa taille, sa couleur, etc... En plus, vous avez une — 
option qui permettra de créer un Brognanes SuperBasic qui regénérera votre dessin. Avec ce procédé, 
vous gagnerez prés de 30Kbytes lors du sauvetage de votre dessin sur microdrive. 


Qu'est ce que cela signifie ? Gestionnaire de Fichiers MicroDrives. L'outil indispensable de chaque 
ossesseur de QL. Il vous permet pour chacun des fichiers affichés de faire soit : COPY, RENAME, 
ACKUP, DELETE, LRUN, LIST et_avec une seule touche ! Exemple : Vous désirez faire en un coup : 

vi ies copier quelques fichiers, en DELETEr deux autres et en RENAMEr un autre. Mettez le curseur tour a 
tour devant chaque fichier, taper la lettre de votre choix pour indiquer l‘ operation que vous 
désirez effectuer. Lorsque c'est fini, pressez ENTER et tout sera fait selon vos deésirs ... 


MS_3D vous souhaite la bienvenue dans la 3éme dimension ! Envolez-vous, voyez les choses sous un 
angle différent | Cette phrase refléte assez bien les possibilités du programme, du moins au sens 
mRurcss Sib) figuré. Ce dernier vous permettra de vous familiariser avec le graphisme en trois dimensions sur 
a ordinateurs. Vous pourrez le faire évoluer, en y rajoutant soit vos propres- routines, soit nos 
futurs modules complémentaires (volumes avec arcs de courbe, calcul des surfaces cachées, etc. ). 


Ensemble de procédures tournant sous ARCHIVE V2. 00 (anglais) qui vous permettront de planifier 


des rendez-vous, des horaires de voyage, des dates anniversaire, etc... Avec diverses options 
MS A enda (Jour dans la semaine d'une date, calendrier pour un mois ou une année donnée, etc...), et 
- g nterrogation du fichier AGENDA pour un jour ou un mois donné. Epuration automatique, et toutes 
les facilités de gestion du fichier (insertions, effacements, recherches, modifications, etc. ). 
Des utilitaires et des commandes supplémentaires (plus de vingt) ! Une Supertrace (vitesse 
réglable), VARS qui affiche toutes les variables, TDF qui permet de définir 15 touches de 
e fonction, IDENT qui arrange votre programme de facon lisib e, une montre mobile, etc. et des 
= PLUS pour : les conversions de base, la gestion du multitasking, l' accés direct, ... 
Attention : Nos prix comprennent frais de port, microdrive(s), explications et sont mentionnés en francs suisses ! 
Découper ici Qe 
Remplissez ce bulletin et envoyez-le ac- Votre adresse en lettres d'imprimerie MS_Morpions a 30.- Frs = 
compagne d'un chéque en francs suisses a MS_Othello 4 30.- Frs = 
l' adresse ci-dessous : NRE: 1S ie say cera: soow sravone 6 anonetwnava  suscendnis 's savenwniNs wg Romana_Paint a 40.- Frs. = 
MS_GFMD a 20.- Frs. = 
BAT GB SO Sisnesoai-s eyssoanga wt: bieuaesa N Sineneed love. snandabva''e MS_3D a 30.- Frs. = 
icrocomputer's oftware HS_Agenda a 20.- Frs. = 
Bie PHAN bos PG ©. HTS % Lert SS OTTERS Re SF BG a2 Plus 50.- Frs. = 
Aloys - Fauquez 60 QL12 
CH = TOTS CAUSANNE, 8 fiat sudnentios a) anacanoad a exensue are musananie as: epanareun wliaveswanie¥ 6 (Prix en francs suisses) T6tal, 1 sever a ¢ vs 
Je vous ai joint un cheque de ............ francs suisses. Veuillez m' envoyer par retour de courrier les programmes ci-dessus sur micro- 
drive(s) et dans les 5 jours. Date? .................4. BLOM RCUR OY cece daisies Senusesiie s wenn ¥ woreraees 


ABC Elecktronic _HiigelstraBe 10-12 
Telex 932 974 — d 4800 Bielefeld 1 
West Germany 


The Giga Soft Mouse for the Sinclair QL is now available! 


The hardware: 

The mouse+ special interface to use 
with the joystick port of the QL 
computer. The mouse resolution is 
0.26mm. 


The software: 
GIGA Basic: This extension adds more 
than 70 new commands to SuperBasic. 
This includes a full screen editor, 
animated sprites, mouse control 
commands, GEM style pulldown 
menus and many more. 


E.A.S.E: A totally new user interface for 
the QL. It supports a desktop 
environment, similar to GEM. It 
includes pulldown menus, icons, really 
scrollable windows, a calculator and a 


Price £49.00 game. This program enables the user to 


. h to all system functions i 
exc. VAT, including post & packing an easy mhentiet. So 
How to order: 1) send a check to ABC / 2) transfer money to Postcheckamt Dortmund to 
Mr. Budde Account No. 902 83 469 / 3) Send an order to the address above, we will send 
the package with post cash on delivery. 
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___We take a rest from the 
complexities of C and examine the 
latest compiler from Metacomco. 


October’s episode in our series looked 
at Structures, powerful data types 
which, more than anything else, set 
C apart from BCPL. The complex 
nature of structures requires some 
time to digest, so this month we have 
decided on a lighter note, to turn our 
attention to Metacomco’s recently 
released Lattice C compiler, compar- 
ing it to GST’s QL Compiler. The 
‘Lattice’ incidentally refers to the 
American company which designed 
and wrote the compiler; Metacomco 
simply wrote the ‘runtimes’ for the 
QL and distribute the software. 

Lattice C is renowned in the IBM 
PC world as one of the fastest and 
most complete compilers available, 
and for producing some of the fastest 
executing and shortest object code. 
The IBM PC product costs consider- 
ably more than the QL computer, so 
QL users should consider them- 
selves extremely lucky to be blessed 
with such an excellent compiler for 
£99.95. As to whether this compiler 
should be bought in preference to 
the GST QC compiler, it’s a question 
of what facilities you want. 


Small and Neat 


GST’s C is what is known as a small 
C. This means that it does not 
implement many of the more ad- 
vanced parts of the language; in 
particular, the complex data types 
such as floats, doubles, structures 
and unions. Small C compilers are 
relatively easy to write and general- 
ly are smaller and faster than their 
full C counterparts. Disadvantages 
are that the syntax accepted by such 
compilers is not necessarily true 
Kernighan & Ritchie C, or that 
important constructs such as the for 
loop may be left out. None of these 
are, of course, insurmountable, but 
it does tend to mean that the 
ostensibly simpler product is less 
suited to the novice C programmer 
than a more complete version. Al- 
though the GST compiler costs some 


£40 less than Metacomco’s, it is 
better suited to the experienced C 
programmer not familiar with the 
QL who wants to get something done 
quickly. This is the case when you 
compare the number of QDOS- 
specific functions provided in the 
two libraries. Metacomco supplies 
the barest minimum while GST 
have taken the time and trouble to 
write a huge number of extremely 
useful library functions which allow 
the programmer to clear windows, 
set colours, make sounds and so on 
without having to delve into QDOS. 

Looking at Lattice C the first thing 
to note is that it has all of the data 
types, all of the operators and all of 
the keywords which constitute the C 
language. It has structures, doubles, 
shorts, typedef, type casts, the con- 
ditional expression, structure poin- 
ters and bit fields. Not all of these 
things are used very often, but it’s 
nice to know they are there! 

Almost as important is that the 
standard library of input and output 
(I/O) functions supplied with the 
compiler complies with the de facto 
standards set by the latest versions 
of the Unix operating system. This 
makes it extremely easy to find out 
how the functions work as they are 
in common usage. Files are opened 
by the fopen function, for example, 
and it returns a pointer to type FILE 
which is defined in the standard 
header file stdio_h. 

As with most Unix systems, there 
are two classes, or levels, of input 
and output supported. The one most 
likely to be used revolves around the 
FILE data type and uses functions 
fopen, fclose, fseek and so on. At a 
lower level, functions such as creat, 
open and close are used and are 
based around the ‘file descriptor’, a 
machine-specific number which the 
operating system uses in its own I/O 
mechanism. For example, a QDOS 
runtime system which implements 
this level of I/O may choose to use 
the internal QDOS channel ID as 
the ‘file descriptor’. It is generally 
possible to discover a normal file’s 
descriptor (one which has been 
opened with fopen, etc.) by using a 
supplied function to interrogate the 
structure pointed to by FILE. This 
level of I/O is often used when 
random access filing is required, as 
it can be more efficient than buffered 
*FILE channels. 

The compiler is supplied on three 
microdrive cartridges and an 
EPROM which plugs in to the back 


C SERIES 


of the QL during compilation. This 
EPROM is not required by the 
runtime system, so any programs 
developed with the system will run 
on ordinary QLs without the 
EPROM. Also, Metacomco does not 
charge for the runtime licence, 
which means that any programs so 
developed may be sold without the 
need to pay a royalty to either 
Metacomco of Lattice. 


Which To Choose 


A weighty A5 manual is also sup- 
plied, and although it is not a 
tutorial it will allow any reasonably 
experienced C programmer to start 
working right away. Each of the 
functions supplied in the runtime 
system is described in detail, as is 
the compiler: itself. Metacomco’s 
screen editor is provided to allow 
you to create and edit source files, 
and the object code modules pro- 
duced by the compiler may be linked 
with the runtimes, and therefore 
made into executable programs, by 
using the supplied linker (just to 
confuse people, the linker is written 
by GST!). These programs may be 
passed command line arguments, 
accessible via arge and argu in the 
usual manner, if you have the 
EPROM plugged in while you run 
them, or if you have the EX and EW 
SuperBasic extensions provided by 
the QJump Toolkit. 

The advantages of the Lattice C 
compiler have already been discus- 
sed, and although I am not going to 
recommend one compiler over 
another here, I am of the opinion 
that this product, although rather 
more expensive than GST’s QC, is 
more useful to the general C pro- 
grammer as all aspects of the lan- 
guage are covered in a standard 
way. It produces code of much the 
same size and speed as the GST one 
(perhaps a little larger and slower — 
it’s hard to measure as the systems 
are so different). GST’s C is great if 
you want to write a program for the 
QL, have knowledge of C but are a 
bit dodgy on machine code. How- 
ever, almost every QL software de- 
veloper is working on other 68000- 
based machines as well, in particu- 
lar the Atari ST, and if you intend to 
develop programs which may sub- 
sequently need to be moved to these 
machines it seems more apposite to 
adopt a compiler’ whose facilities 
more closely follow the Kernighan & 
Ritchie/Unix standards. 
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ie ane? 


ore QL 


912K QL 
£325 


inc. VAT 


Following the success of our internal 512K memory upgrade, 
we are now able to offer new QL's with a full 
12 months warranty and complete with 512K memory as standard. 


This elegant solution to the serious memory limitations of the QL 
also provides you with the additional benefit of:- 


No increased power drain allowing you to add any cards without problems 
including the leading Silicon Express Disk Insider Board 
(see separate advertisement) 


For immediate despatch of goods contact our friendly 


sales desk quoting your Access details 
or simply send your order and remittance to the address given below 


silicon 
EXNress 


Silicon Express Limited 
Silicon House, Fowke Street, Rothley, Leicestershire LE7 7PJ, U.K. Tel: 0533 374917 
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Masterminder 


Peter Derlien 


Its surprising how much you can 
cram into a few lines. Based on the 
highly popular board game, the 
object here is to deduce the order in 
which a set of four coloured pegs are 
arranged in as few turns as possible. 
Each peg may be either black, white, 
red, yellow, green or magenta. You 
take your turn by entering the first 
letter of the colour of each of the four 
pegs in the order in which you believe 
they will appear — ie. {bgry} , 
{ggrw}. A 

After each turn the QL will indi- 
cate how close you are to the true 
combination. This is done by display- 
ing a set of four circles on the screen. 
A black circle means that one of your 
pegs is of the correct colour and in the 
correct position. A white circle 
means that it is of the correct colour 
but in the wrong position. Any empty 
circle means that one coloured peg 
doesn’t appear at all. 


100 REMark MASTERMINDER by P. J. Derlien 
110 REPeat aain 

120 CLS:CLS #0:col$s"bwryga":ht=94:max=4 
130 AT O,15:PRINT @ax3" from ("3col$;"}" 
140 RANDOMISE DATE:qoal$="" 

150 FOR j=1 10 aax 

160 goal$=goal$kcol$(RND(1 TO 6)) 

170 NEXT j 

180 REMark PRINT "target ";goal$ 

190 ng=0:solved=0 

200 REPeat loop 


210 -REPeat ask 

220 INPUT #0,"quess? ":quess$ 

230 IF LEN(quess$)=max THEN EXIT ask 
240 PRINT #0,max 3" pegs, please” 
250 END REPeat ask 

260 CLS #0sng=ngtisht=ht-10 

270 IF ht<4 THEN ht=4:SCROLL -10 

280 CURSOR 3,ht,-6,-5 

290 = PRINT ng3T0 3;quess$ 

300 assess 

310 IF black=max THEN solved=i 

320 x=40: INK 7:FILL 0 

330 FOR j=1 TO max 

340 IF black THEN 

350 INK O:FILL isblack=black-1 

340 ELSE 

370 IF white THEN FILL l:white=white-1 
380 END IF 

390 CIRCLE x,ht,2sxex+15sINK 7sFILL 0 
400 NEXT j 

410 IF solved THEN EXIT loop 


420 END REPeat loop 
430 PRINT "Remarkable, Mr. Holaes!" 


440 PRINT 80,"Press SPACE for another gaee" 
450 kS=INKEYS(-1) 

460 END REPeat aain 

470 DEFine PROCedure assess 

480 black=0:white=0:goalcopy$=goal$ 

490 FOR j=1 TO max 

500 IF quess$(j)=qoal$(j) THEN black=black+l:goa 
Icopy$(j)=" ":quess$(j)="x" 

510 NEXT j 

520 FOR j=1 10 aax 

530 v=(guess$(j) INSTR goalcopy$) 

540 IF v THEN white=whiteti:goalcopy$(v)=" " 
550 NEXT j 

560 END DEFine assess 


Billy Bounder 


Norman Paton 


Even in its abridged form, this plat- 
form game should provide quite a few 
hours entertainment. Billy Bounder, 
our bouncing Texan, has to negotiate 
three screens of varying difficulty to 
reach his journey’s end. 

Each screen is filled with a unique 
assortment of ladders, levels and 
walls. Mines and invisible holes crop 
up in the most unexpected of places 
making Billy’s journey all the more 
hazardous. To make things even har- 
der there’s a time limit to each 
screen. If it is exceeded Billy will lose 
one of four lives. Billy’s movements 
may be controlled by joystick or cur- 
sor keys — (Fire/Space Bar to jump). 

The program, which runs in TV 
mode is an interesting mix of 
machine code (including checksums) 
and SuperBasic. Each screen is 
separately defined and adding your 
own screens is a doddle using the 
simple procedures set_up, ground, 
wall, ladder and mine_lay. Once you 
have created your own screen, say 
screen4, simply amend the program 
so that play continues when screen_ 
num is incremented by one: 


200 IF screen_num=5 THEN 
EXIT play_g 
901  =4:screen4 


If you like the program but cannot 
add to it yourself a full length version 
with many more screens and 
obstacles is available from the Micro- 
drive Exchange. 


100 REMark BILLY BOUNDER 

110 REMark (C) Norman Paton 1985 
120 initialise 

130 REPeat whole_gaae 

140 game_init 

150 REPeat play_gaae 


160 local_init 
170 IF life_num=5 OR screen num=4 THEN EXIT play_game 
180 game_proc 
190 END REPeat play game 
200 IF screen_num=4 THEN winner 
210 REPeat another game 
220 CLS #0: CSIZE 1,0: AT #0,1,7: PRINT #0,"Another Game? [Y/N 
1": p]S=INKEY$(#0,-1) 
230 IF (pl$ INSTR "YyNn") THEN EXIT another game 
240 END REPeat another _game 
250 IF (pl# INSTR "Nn") THEN EXIT whole game 
260 END REPeat whole game 
270 STOP 
280: 
290 DEFine PROCedure initialise 
300 LOCal parar 
310 set_up: INK 6; CSIZE 1,1: AT 2,8: PRINT "Billy Bounder" 
320 CSIZE 1,0: AT 10,4: PRINT "By Norman Paton" 
350 AT 15,8: PRINT "Please Wait": CSIZE 0,0 
340 sprite setup 
350 prog=RESPR(2048): return_data=RESPR(10): data_table=RESPR( 
1024) 
Jo0 param=prog 
370 prog_read 2750,paran,92 
380 END DEFine 
DH 
400 DEFine PROCedure game init 
410 L0Cal base 
420 acreen_nua=l: life_nun=1 
430 game_time=DATE 
440 base=prog+!245 
450 prog read 3580,base,6 
460 END DEFine 
470: 
480 DEFine PROCedure prog read (start_line,address,length) 
49) LOCal c.ct,line_nua,csua,checksua 
500 line _nua=start_line: fault=0 
EST -RESTORE start_line 
520 FOR c=0 TO length 
530 csua=0 
540 FOR ct=1 TO 15 
550 IF NOT EOF THEN 
560 READ t: csum=csuatt 
57) POKE address,t 
580 address=addresstl 
390 END IF 
600 END FOR ct 
0 IF NOT EQF THEN 
620 READ checksum 
630 IF csua<>checksum THEN 
640 PRINT “Error in ";line_num 
650 fault=1 
660 END IF 
470 line_num=line_nua+!0 
680 END IF 
690 END FOR c 
700 IF fault THEN STOP 
710 END DEFine 
720 + 
730 DEFine PROCedure local_init 
740 LOCal n,z,offset 
750 offset=0: RESTORE 2410 
760 FOR n=1 10 3 
770 FOR z=1 T0 13 
780 READ temp 
790 POKE_L (data _tabletoffset) ,temp 
800 of tset=offset+4 
810 END FOR z 
920 END FOR n 
830 END DEFine 
840 : 
850 DEFine PROCedure game_proc 
860 LOCal end_screen 
870 SELect ON screen_nua 
980 =1: screen! 
890 =2: screen2 
900 =3: screen3 
910 END SELect 
920 REPeat sc_loop 
930 cur=0: pfall=0: end_screen=0 
940 time=0: st_tiae=DATE 
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950 CSIZE 1,0: AT #0,1,8: PRINT #0, (S-life_num); 

960 REPeat loop 

970 cur=KEYROW{ 1) 

980 CALL prog,data_ table, sprite_data,cur,return data 

990 scn_add=PEEK Lidata table+4) 

1000 IF ABS(scn_add-135128)<2 THEN end ~Screen=1; EXIT loop 
1010 cfall=PEEK W(return_data 

1020 IF (cfall-ptall)<-100 OR (tiae>60) THEN EXIT loop 
1030 IF PEEK Wireturn_data+2)=255 THEN EXIT loop 

1049 pfallzcfall: time=DATE-st_tiae 
1050 AT #0,1,26: PRINT #0,tines" ay 
1060 END REPeat loop 

1070 IF end screen OR life Num=3 THEN EXIT sc_loop 

1080 life _num=life_nuatl 

1090 BEEP 3000,150,0,0,0,0 

1100 END REPeat sc _loap 

1110 IF end screen: screen _fua=screen_nuatl 

1120 END DEFine 

1130: 

1140 DEFine PROCedure sprite setup 

1150 LOCal address, teap, loap 

1160 sprite data=RESPR(1024); address=sprite data: RESTORE 245 
0 

1170 REPeat loop 

1180 IF EOF THEN EXIT loop 
1190 READ teap 

1200 POKE_W (address) ,teap 
1210 address=address+2 

1220 END REPeat loop 

1230 END DEFine 

1240: 

1250 DEFine PROCedure winner 
1260 CLS 

1270 INK 42 CSIZE 1,1: PRINT * 
eted: * 

1280 PRINT: INK 6: PRINT * 
1290 PRINT 

1300 INK 4: PRINT * 
-DATE) 

1310 PAUSE 5000 

1320 END DEFine 

1330 : 

1340 DEFine PROCedure ladder (xb, yb, Tht) 

1350 LOCal ¢ 

1360 INK 4 

1370 FOR c=yb+5 TO yb+lht-5 STEP 5: hline xD, C56 

1380 END DEFine 

1390 ; 

1400 DEFine PROCedure ground (xb, yb, git) 

1410 LOCal c 

1420 INK 5 

1430 FOR c=xb TO xb+glt-5 STEP 3: LINE c,yb TO c+3 syb+3 TO ct+3 
syb 

1440 INK 4 

1450 hline xb,yb,glt: hline xb,yb+3,glt 

1460 INK 2 : 

1470 viine xb,yb+1,2: vline xb+glt-2,yb+!,2 

1480 END DEFine 

1490 : 

1500 DEFine PROCedure wall (xb,yb,wht) 

1510 LOCal ¢ 

1520 INK § 

1530 FOR c=yb TO yb+wht-3 STEP 3: LINE xb,c TO xb+3,c+3 TO xb, 
c+3 

1540 INK 2 

1550 viine xb,ybywhts vline xb+3,yb unt 
1560 INK 4 

1570 hline xb,yb+wht 4.5 

1580 END DEFine 

1590 : 

1600 DEFine PROCedure set_up 

1610 MODE 8: PAPER 0: CLS 

1620 BORDER 4,4: BORDER #0,4,6 

1630 AT #0,1,0: PRINT #0,"Lives : 

1640 INK 2 

1650 LINE 0,0 T0 0,100: LINE 16,0 TO 144,100 
1660 viine 0,0,100: vline 165,0,100 

1670 END DEFine 

1680 + 

1690 DEFine PROCedure eine lay(xb, yb) 

1700 FILL 1: INK 3: CIRCLE xb,yb,ts FILL 0 
1710 FOR c=0 TO 2#P1 STEP .78: LINE xb,yb TO xb+34SIN(c), yb+3# 
cosic) 

1720 END DEFine 

1730: 

1740 DEFine PROCedure hline(xb,yb,1) 

1750 LOCal ¢ 

1700 xr=xb+] 

1770 FOR c=0 TO ,8 STEP .4: LINE xbyybtc 10 xr,ybtc 

1780 END DEFine 

1790 + 

1800 DEFine PROCedure vline(xb,yb,1) 

1910 LOCal c 

1820 yt=yb+] 

1930 LINE xbyyb TO xb,yt 

1840 LINE xb+.4,yb TO xb+.4,yt 

1850 LINE xb+.8,yb TO xb+.8,yt 


Well done, you have coap 
Billy Bounder* 


Score=";(6-life_nua)#(2000+gane_tiae 


Tiae 3" 


50/QL User/December 1985 


1860 END DEFine 

1870 : 

1980 DEFine PROCedure screent 
1990 set_up 

1900 ground 2,4,20 
1910 ground 2,27,20 
1920 ground 50,20,12 : ground 38,50,12 

1930 ground 45,15,12 : ground 48,35,12 

1940 ground 50,40,12 : ground 85,15,80 

1950 ladder 87,15,20 +: ladder 120,15,40 

1960 ground 120,55,45 : ground 80,55,32 

1970 ground 70,60,10 : ground 10,70,58 

1980 ladder 38,50,20 : ground 78,78,70 

1990 ladder 159,50,30 : mine lay 130,60 

2000 INK 6sCSIZE 0,1: AT 0,1:PRINT "Billy Bounder" 
2010 PAPER 4: INK 0: CSIZE 0,0: AT 0,25: PRINT "EXIT® 
2020 END DEFine 

2030 : 

2040 DEFine PROCedure screen2 

2050 set_up 

2060 wall 82,0,60 — : ground 26,77,53 

2070 ground 89,14,15 : ground 111,22,16 

2080 ground 135,31,40; ground 111,40,17 

2090 ground 89,50,15 : ground 70,50, 10 

2100 ground 90,78,50 : ground 50,50,10 

2110 ground 45,30,15 : ground 70,20,12 


Ladder 4,7,20 
ground 30,20,10 


2120 ground 95,5,15 : ladder 8,-1,88 

2130 ground 17,44,8 : ground 25,30,15 

2140 mine lay 50,82 + ground 45,2,15 

2150 INK 6: CSIZE 0,0: AT 5,5: PRINT “Billy Bounder* 

2160 PAPER 4: INK 0: AT 0,25: PRINT “EXIT* 

2170 END DEFine 

2180 : 

2190 DEFine PROCedure screen3 

2200 LOCal n 

2210 set_up 

2220 ground 10,5,140 : ladder 10,4,40 

2230 wall = 134,9,5 wall 120,9,5 

2240 mine lay 126,9 ine lay 131,9 

2250 mine lay 100,8 mine lay 80,9 

2260 mine_lay 60,10 mine_lay 40,11 

2270 ground 10,38,30 ground 50,38,30 

2280 ground 85,47,12 ground 60,55,18 

2290 ground 40,44,20 ground 64,74,20 

2300 ground 92,44, 10 ground 108,54,10 

2310 ground 118,50,10 + ground 130,57,10 

2320 mine_lay 120,55 ground 142,65,7 

2330 ground 151,70,7 ground 110,78,31 

2340 mine lay 135,83 aine_lay 34,42 

2350 mine_lay 116,9 

2360 PAPER 6: INK 0: CSIZE 0,0:AT 0,25: PRINT "FINI" 

2370 PAPER O: INK S: CSIZE 1,1: AT 0,1: PRINT “Billy Bounder" 
2380 END DEFine 

2390 + 

2400 REMark Basic Data 

2410 DATA 1,155118,0,23,0,0,8,0,0,0,0,0, 
2420 DATA 2,0,0,23,0,0,0,96,192,0,0,0,0 
2430 DATA 2,0,0,23,0,0,0,288,384,0,0,0,0 

2440 RENark Stand 

2450 DATA 512,32768,512,32748, 2560, 40960,3,192,3,192,3 

2460 DATA 192,3,192, 2565, 41040, 10773, 43092, 41553, 34884, 41553,3 
4884 

2470 DATA 10773,34884, 2565 ,34884,513 154884 ,512,32780,512,32768 
512 

2480 DATA 32768, 2560 ,40960, 2048, 8192, 2048, 8192, 2048, 8192, 2048, 
8192 

2490 DATA 10256, 10244, 10260, 10240 

2500 REMark Left 1 

2510 DATA 512,32768,512, 32748, 2540, 40960, 514, 32896, 3,32896,3 
2520 DATA 32896,3,192,513, 41040, 2565, 43092, 2545, 43092, 10773, 34 
884 

2530 DATA 8721 ,34884,8721, 34884, 561, 34884, 512,32780,512,32768, 
2540 

2540 DATA 32768, 2048,32768, 2048, 32768, 2048, 32768, 204832768, 20 
48,32748 

2550 DATA 10769, 32768, 10773, 32832 

2560 REMark Left 2 

2570 DATA 512,32768,512,32768, 2560, 40960,514,32896,3, 32896 ,3 
2580 DATA 32836, 3,192,513, 41040, 2505, 43092, 2565, 43405, 10773,35 
397 

2590 DATA 8721 ,32835,8721 ,32832,56! ,32832, 912,32768,512,32768, 
2560 

2600 DATA 32768, 2048, 32768, 2048, 32768, 2048, 43012, 2048, 43012, 20 
48,2052 

2610 DATA 10256, 2052, 10260, 2052 

2620 REMark Right! 

2630 DATA 512,32768,512,32768, 2560, 40960 ,514,32896, 514,192,514 
2640 DATA 192,3,192, S13, 41040, 2565, 43092, 10773, 43092, 10773, 348 
44 

2650 DATA 8721 ,34884,8721 ,34884,561,32844,512, 32768, 512, 32768, 
512 

2660 DATA 32768,512, 40960, 512,8192,512,8192,512, 8192,512,8192 
2670 DATA 512,43076,513,43092 

2680 RENark Right 2 

2690 DATA 512,32768,512,32768, 2560, 40960,514, 32896 514,192,514 
2700 DATA 192,3,192,513,41040,2565,43092, 10773, 43092, 10773, 349 
84 


: 
i 
: 
i 
i 
: 
: 
: 
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2710 DATA 41555 , 34884, 33345, 34884, 705, 32844 ,512,32768,512,3276 
8,512 
2720 DATA 32768,512,40960,512,8192, 10768, 8192, 10768, 8192 8208, 
8192 


2730 DATA 8208,10244,0,10260 

2740 RENark Prograa Code 

2750 DATA 67,250,4,206,34,129,67,250,4, 204,34, 130,32,65,36, 151 
2 

2760 DATA 122,4,192,71,250,4,196,38, 132, B,3,0,6,103,0,1129 
2770 DATA 0,6,78,186,0,160,8,3,0,4,103,0,0, 8,118,674 

2780 DATA 2,78,250,0,18,8,3, dy 1,103,0, 0, 8,118, 1,590 

2790 DATA 78,250,0,4,118,0,40, 58, 4,160, 75,250,4, 164,74, 1281 
2800 DATA B5,103,0,0,6,78,186,0,32,78,186,0, 134,73,250,1211 
2810 DATA 4, 138, 40, 131,78, 186,2,40,78,186,1,98,32,122,4, 1140 
2820 DATA 112, 48, 186, 4,124,112, d, 78,117, 38,58,4,112, 73,250,131 
6 

2830 DATA 4,118,66,128,48, 20,229, 64,40,4,32 1422,4,76, 52,1047 
2840 DATA 3,192,250,4,68,209,192,32,40,0,4, 1, 250,4,92, 1411 
2850 DATA 34,52,176,0,208,129,33,64,0,4,71,250, 472,38, 1135 
2860 DATA 129,32,12,228,64,82,64,12,64, d, 8,102,0,0,4,801 

2870 DATA 112,0, By 250, 4,54 ,56,128,38,58,4,38, 78,117, 73,1083 
2880 DATA 250,4,36,74,84,102,0,0,16, 1, 250,4,32,74,84, 1083 
2890 DATA 102,0,0,6, 56, 188,0,1,78,117, 47, 0,47,1,47,690 

2900 DATA 2, 47, 4,47,6,47,7,47, a, 47,11,47,12,47, 13,392 

2910 DATA 73,250,3,246,74,84, 108, 0,0,6, 3, 98,5, 232,32, 1202 
2920 DATA 122,3,208,32,3,192,250,3,200, 209,192, 34 40, 0,12,1500 
2930 DATA 6,129,0,0,0,1,194,252,0, 128,210, 148,0,4,42, 1134 
2940 DATA 65,40,40,0,24,78,186,0,28,78,184,0, 70, 42,95,932 
2950 DATA 40,95,3B,95,32,95,46,31,44,31,40, 3, 36,31,34,719 
2960 DATA 31,32,31,79, 117, 32, 60,0,0,0,6,78, 186, 1,20,672 

2970 DATA 74,71, 102, 0,0,12,2,70, 127, 252, 74,70,102,0,0,956 
2980 DATA 12,219,252,0,0,0,128,81, 200,255, 228, 36,60,0,0,1471 
2990 DATA 0,6,148,64,78,117,71,250,3, 126,74, 8%, 103,0,0,1123 
3000 DATA 6,78,250,0,34,71,250,3,106,213,83,12,44,0, i 1179 
3010 DATA 103, 0,0,8, 66,83, 78,250,0,4,213,83, 196,252, 0, 1336 
3020 DATA 128, 213, 168,0,4,78,117,66,126,48,19,71,250,3, 70,1363 
5030 DATA 6,83,0,4,12,64, , 4,108,0,0,22, 196,252, d, 751 

3040 DATA 128,32,58,3,52,190,128,109,0,0,8, 144, 130,209,168, 134 
9 

3050 DATA 0,4,78,117,32,122,3,8, 198, 250,3, 2,209, 195,40, 1261 
500 DATA 122,3,6,57,124,0,0,0,2,42,104,0,4,40, 40,544 

3070 DATA 0,24,4,132,0,0,0,8,32,60,0,0,0,11, 78, 349 

3080 DATA 186,0,138,2,6,0,128, 102, 0,0,14,2, i, 0,196,781 

3090 DATA 12,7,0,194,103,0,0,16, 219,252, 0,0, 0,255, 81,1141 

3100 DATA 200,255, 224,78,250,0,10, 87, 124, d, 285 10)2578, 117, 1650 
3110 DATA 42,104,0,4 219,252, 0,0, d, 4,32,60,0,0,0,717 

3120 DATA 11,78, 184,0,76,2,134,0,0,0,128,102,0, 0,16,733 

3130 DATA 2, 135, 0,0,0,196,12,7,0,196,103,0,0,14, 219, 884 

3140 DATA 252,0,0,0, 255, 81,200, 255, 220,78, 117, 57, 124,0,255, 189 
4 

3150 DATA 0,2,78,117,218,252,0,5,30,21,28,37, 224,159,224, 1395 
3160 DATA 158,30,37, 28,37, 204, 159,224,158, 30,37,28,37, 233 yO, 
1611 

3170 DATA 233,190, 78,117, 66,134, 64,135, 28,29, 30, 21,233, 190,233 
11783 

3180 DATA 191,78,117,74,67,102,0,0,8,78, 186,0,24,78,117,1120 
3190 DATA 12, 47, 0,1,102,0, d, 8,78, 186,0,30, 78, 117, 78,757 

3200 DATA 184,0, 146, 78, 117, 34,122,2,42,182, 48, 108, 0,0,6,1086 
3210 DATA 78,186,1,6,78,186,1,40, 78,117, 32,122,2,18,34,979 
3220 DATA 122,2,18,182,48,103,0,0,6,78, 184,0, 238, 32,122, 1157 
5230 DATA 2,0,32,3, 192,250, 1,248,209, 192,42, 104,0,4,47, 1326 
3240 DATA 4,40,40,0,24,4,132,0,0,0,8,32, 60,0,0,344 

3250 DATA 0,11,78, 186, 255, 134, 2,60,128,102,0,0,14,2,920 

5260 DATA 7,0,196,12,7,0,128, 103, 0,0,40,219,252,0,0,964 

3270 DATA 0,255,81,200, 255, 224,32, to, ,24,89,64,12,0,0,1276 
3280 DATA 8,108,0,0,12, 112,16,4,168,0,0,0,2,0,4, 434 

3290 DATA 33,64,0,24,40,31,78,196,0, 174,78, 117,32,122, 1,980 
3300 DATA 152,34,122,1,152, 182, 68, 103,0,0,6,78,186,0, 116, 1200 
3310 DATA 32,122,1,134,32,3,192,250, 1,124, 209,192,42,104,0, 144 
0 

3320 DATA 4,219,252,0,0,0,4,47,4,40,40,0,24,4, 132,770 

3330 DATA 0,0,0,8,32,40,0,0,0,11,78, 184,255, 8,2, 640 

5340 DATA 134,0,0,0,128,102,0,0,16,2,135,0,0, 0,196,713 

3350 DATA 12,7,0,128,103,0,0,40,219,252,0,0,0, 255,81 ,1097 

3360 DATA 200, 255, 220,32, 40,0,24,88,64,12,0,0,16,111,0, 1062 
5370 DATA 0,12,112,8,6,168,0, 0, 0,2,9,4,33,64,0,409 

3380 DATA 2h, 40, 31,78, 186,0,42, 78,117, 32, 122,1,20,32,4,807 
3390 DATA 192,250,1, 12,209,192, 71,250, 1, 20,38, 168,0,4, 71,1479 
3400 DATA 250,1,16,38,168,0,24,66,168,0,4, 78, 1B4,0,40,1039 
3410 DATA 78, 117,32, 122,0,238,32,3, 192, 250, 0,230, 209, 192,184, 1 
879 

3420 DATA 67,103,0,0,14,33,122,0,232,0,4,33, 122,0, 230,960 

3430 DATA 0,24,78,186,0,4,78,117,47,0, 47,1,47,2,47,678 

3440 DATA 4,47,6,47,7,47,10,47,12,47, 13, 32, 40,0,8,367 

5450 DATA 103,0,0,50, 2, 40,0, 12, 4, 40,0,16,229, 135,34, 749 

3460 DATA 71,40,112, 160,28, 217, 201, 42,64,40,40,0,20,78, 186,129 
9 

3470 DATA 9, 90,34, 40,0, 16,36, 16,82,65, 180,65, 102,0,0,724 

3480 DATA 4,114,0,33, 65, ,16,33,104,0,4,0,8,33, 104,518 

3490 DATA 0,24,0,20,32,40,0,4,103,0,0,30,42, 40,0, 335 

3500 DATA 12,42,64,40,40,0,24,46,40,0, 16, 229, 135,36, 71,795 


3510 DATA 40,112, 160,28, 207, 201,78, 186,0,22,42,95,40,95, 36, 135 
2 


3520 DATA 95,46,31,44,31,40,31,36,31,34,31, 32,31, 78,117,708 
5530 DATA 47,13,44,60,0,0,0,0, 4, 60,0,0,0,0,13, 283 

3540 DATA 12,0,0,15,12,0,1,232,190,232,191, 189,29, 191,29, 1523 
3550 DATA 225, 158, 225, 159, 189, 29,191,29, 225, 138,225,159, 189,29 
sf91, 2381 

3560 DATA 21,88, 76,218, 252,0,123,81,205, 255, 204,42,95,78, 117, 1 
855 

3570 DATA 0,52,0,0,0,0,0,0,0,0,0,0,0,0,0, 52 


3580 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

3590 DATA 0,0,0,0,0,0,0,0, 255,255, 253,0, 255, 255, 254, 1527 
3400 DATA 0,255,255, 255,0,0,0,0,0,0,0,1, 0,0,0, 76 

3610 DATA 2,0,0,0,3,0,0,0,0,0,1 


™ 


Pentathelete Il 


A Didcock 


Apologies to all those who typed in 
last month’s Pentathelete program 
only to discover that the program 
crashed at lines 4 and 5 with the 
error message “not found”. 

To solve this problem you will have 
to type in the following short pro- 
gram which generates the user 
defined graphics in Pentathelete. 
Once entered this program should be 
saved as follows: 

SAVE mdv1_UDG_data 
Having done this load last month’s 
Pentathelete program, delete line 4 
and then save the corrected version 
of the game on the same microdrive 
as this program. Now, provided you 
have not made any typing errors in 
entering either listing you will find 
that Pentathelete runs (and jumps!) 


32005 star t=RESPR(100) 

32010 a0=65537 

32020 a2=start+s 

32030 RESTORE 32100 

32040 FOR i=0 TO 70: READ byte: POKE start+i ,byte 
32050 CALL start,0,0,255,37,0,0,0,a0,0,a2 
32060 60 T0 7 

32099 : 

32100 DATA 32,4,78,67,78,117 

32110 DATA 128,7 

32120 DATA 96,112, 24,92,124,12,20,36,76 
32130 DATA 100,104,112,112,96,96,80,72,108 
32140 DATA 24,24,48,52,60,48,56,40,76 
32150 DATA 24,24,48,48,48,48,16,16,48 
32160 DATA 88,88, 112,52,60,48,56,40,76 
32170 DATA 88,88, 112,48,48,48,16,16,48 
32180 DATA 0,48,48,96,120,96,124,0,0 


Sliding Puzzle | 
C Debski 


We have received a number of sliding 
puzzle programs but none as good as 
this. The first program, published 
this month, is the puzzle itself. It 
takes a pre-defined picture and 
jumbles it up into 5 x 5 blocks. The 
blocks must then be moved using the 
cursor keys so that the original pic- 
ture is recreated. This is far from 
easy as a block may only be moved if 
a previous move has vacated a space 
adjacent to it on the 5 x 5 grid. 

A count is kept by the computer of 
the number of moves required to 
reconstruct the original picture. 

The second program will appear in 
our January issue. 


100 REMark ## Picture Create for Sliding Puzzle ## 
110 REMark ## Copyright (C) D.Debski 1985 ## 

120 REMark ## For QL User ## 

130 set_scriget_col 

140: 

150 DEFine PROCedure set_scr 

160 MODE :PAPER 7:CLS:INK 0 

170 OPEN#3,con_208x 200a272x16 

180 DIM color (19,19) :x=0sy=0: 

190 CSIZE#O,3,1:FLASH#O, 1:CLS#O:PRINT#O, FILLS (CHRS 
(32) ,7);"INITIALISING": FLASH#O, 0: CSIZE#O,0,0 

200 FOR a=0 TO 19 

210 BLOCK 448,10,0,108a,a 

220 FOR b=0 TO 19:color(a,b)=7 

230 END FOR a 


240 CLS#O: INK 0 

250 CLS:PAPERS3,3: INK#3,0:CLS#3:PRINTHS;" Keys :-" 

\\" 0 - Black"\") 1 - Blue"\" 2 - Red"\" 3 - Ma 

genta’\" 4 -Green"\" 5 - Cyan"\" 6 - Yellow"\' 
‘7 - White’ 

260 PRINT#3: PRINT@3 , CHRS (190) \CHRS (188) s CHRS (189) \ 

CHRS (191) sPRINT@3:PRINT#3," ENTER to finish” 

270 curr_col=color(x,y):SELect curr_col=0 TO 3: INK 
7 

280 PAPER color(x,y):AT y,xsPRINT "+" 

290 END DEFine 

300 : 

310 DEFine PROCedure get_col 

320 REPeat loop 

330 REPeat key_loop 

340 out=03col_out=10:key$=INKEY$(-1) 

350 -k=CODE (key$)s IF k=208:out=1 

360 IF k=216sout=2 

370 IF k=192:0ut=3 

380 IF k=200:out=4 


“390 IF k=102EXIT loop 


400 SELect k=48 TO SSscol_out=k-48 

410 IF out OR col_out(10 THEN EXIT key_loop 

420 END REPeat key_loop 

430 IF out 

440 ok=Osey=y: ex=x 

450 SELect ON out 

460 =1:1F yOsy=y-Lrok=1 

470) =2:1F y<i9sy=ytlsok=! 

480) =3:1F x>Osx=x-Lrok=l 

490) =As IF xCl9sok=lexextl 

500 END SELect 

510 IF NOT ok THEN NEXT Loop 

520 BLOCK#ref ,6,6,across#b,up#6,color (pos(ref) up, 
across) 

530 END FOR across 

540 END FOR up 

550 movemovtl:passed=1 

560 FOR check=3 10 18:1F pos(check)=check-3:NEXT c 
hecksELSE passed=0:EXIT check 

570 IF passed THEN RETurn 

580 END REPeat forever 

590 END DEFine gage 

600 : 

610 DEFine PROCedure set scr 

620 x=185:y255sex=ex:PAPER 7:CLS:RESTORE 1500 

630 FOR i=3 TO 18 

640 op$="con_30x30a"bexd"x"ky c 

650 OPENBi ,op$:PAPERi ,7:CLS#i sex=ex+30 rs, 


660 SELect i=6,10,14sex=xsy=y+30 k~ 7 

670 END FOR i Yd, 
680 END DEFine set_scr Ke 
690 + i 


700 DEFine PROCedure keys 

710 BORDER 20: INK O:PRINT CHR$(190) \CHR$ (188) s CHRS 
(189) \CHRS(191)\SBORDER 0 

720 AT 7,0:PRINT "  ESC"\" to quit" 

730 END DEFine keys 

740: 

750 DEFine PROCedure init 

760 CSIZE#0,3,1:CLS#0: FLASH#O, 1: PRINT#O: PRINT#O,FI 
LLS(CHRS (32) ,7);"INITIALISING":CSIZE#0,0,0:FLASHEO 
\) 

s] 

770 RESTORE :DIM color (15,4,4) ,pos(18) 

780 FOR al=3 TO 18:pos(al)=al-3 

790 FOR part=0 TO 15 

800 BLOCK 448,12,0,12.5tpart,part 

810 FOR up=0 TO 4 

820 READ col$ 

830 FOR across0 TO 4 

840 color (part ,up,across)=col$(acrosstl) 

850 END FOR across 

840 END FOR up 

870 END FOR part 

880 CLS#O:PAPER 7:CLS 

890 END DEFine init 

900 : 

910 DEFine PROCedure deno(fac) 

920 x=320: ey=b0: ex=x 

930 add=0:1F NOT fac THEN add=3 

940 FOR part=0+tadd TO i5tadd 


950 FOR up=0 TO 4 ® 
960 FOR across=0 TO 4 

970 IF facsBLOCK 4,4, across#4+ex ,up#4tey,col or (par 
t,up,across):ELSE BLOCK#part 6,6, across#é,up#d,col 
or (pos(part) ,up, across) 

980 END FOR across 

990 END FOR up 

1000 ex=ex+20 

1010 SELect part=3,7,llsex=x:ey=ey+20 

1020 END FOR part 

1030 END DEFine deao 

1040 : 

1050 DEFine PROCedure jueble 

1060 FOR as=3 TO 18 

1070 pos(as)=15-(as-3) 

1080 END FOR as 

1090 END DEFine jueble 

1100: 

1110 DEFine PROCedure end_of_game 

1120 PAPER#O, 7: INK#0,0:CLS#0 

1130 PRINT#0,"You completed the puzzle in "saov;" 
aoves" 

1140 PRINT#O: INPUT#0O, "Another game (Y/N) ? "san$ 
1150 PAPER#O,0: INK#0,7:CLS#0 

1160 IF an$=="n" THEN STOP 

1170 END DEFine end_of game 

1180 : 

1190 DEFine PROCedure quit 

1200 PAPER#0,7: INK#0, 0:CLS80 

1210 PRINT#O,"It took you *saovs;" aoves to get thi 
s far" 

1220 PRINT#O: INPUT#0;"Save game status (Y/N) ? "3s 
v$ 

1230 IF sv$e="y* 

1240 CLS#O:INPUT#O,"File name (including advi_/adv 
2.) 2 "stiles 

1250 PAPER#0O,0:CLS#0: INK#0, 7:CSIZE#0,3,1:FLASH#O, 1 
:PRINT#O,FILL$(CHR$ (32) 9); "SAVING": CSIZE#O,0, 0: FL 
ASH#O,0 

1260 DELETE file$:OPEN NEWHL9, files 

1270 FOR out=3 TO 18 

1280 BLOCK 448,12,0,12.5#(out-3) ,out-3 

1290 PRINT#19, pos (out) 

1300 END FOR out 

1310 PRINT#19, mov 

1320 CLOSE#19:PAPER 7:CLS 

1330 END IF 

1340 PAPER#O, 0: INK#0,7:CLS#0 

1350 STOP 

1360 END DEFine quit 

1370: 

1380 DEFine PROCedure load game 

1390 CLS#O: INPUT#O, "File name (including advi_/adv 
2.) 2 "sfiles 

1400 CLS#O:CSIZE#0,3, L:FLASH#O, 1:PRINT#O,FILLS(CHR 
$(32) 8); "LOADING": CSIZE#0,0,0:FLASH#O,0 

1410 PAPER 7:CLS:OPEN_IN#L9, files 

1420 FOR in=3 TO 18 

1430 BLOCK 448,12,0,12.5#(in-3) ,in-3 

1440 INPUT#I9, pos (in) 

1450 END FOR in 

1460 INPUT#I9,aov 

1470 CLOSE#19:PAPER 7:CLS 

1480 END DEFine load_gaae 

1490 + 

1500 DATA 55555, 55554, 55544, 45445, 44454 

1510 DATA 55955, 44455,55445,55545, 44455 

1520 DATA 55555, 55566 , 55666 55666, 55666 

1530 DATA 55555, 65555, 64555, 66555, 66595 

1540 DATA "00544", "00445", "00455", "00114", "00444" 
1350 DATA 55445, 55545, 44455, 41441, 11141 

1560 DATA 55566,55555, 55555, 11111, 1211! 

1570 DATA 65555, 55555, 55595, 11111, 11111 

1580 DATA "OO4E1","OOLL1", "OO111", "OLL11", "OLLIE" 
1590 DATA LALLL, E10, 20202, 20000 20tt 

1600 DATA U1U11, 11911, 11211, 11166, 16666 

1610 DATA 11111,11166,66666, 66466, 64646 

1620 DATA "01111", "06656", "06646", "06666",."06666" 
1630 DATA 11166, 66646, 66666, 65665 , 64666 

1640 DATA 66666, 66666, 66666,66665, 66666 

1850 DATA 77777,77777 7777777777 77777 


QL User/December 1985/51 


Froggy — Part 1 


Tony Day 


When a reader’s program is’ this 
excellent you begin to wonder why so 
little commercial software fails to 
make the grade. Smooth scrolling 
graphics, fast action, varied play — 
all are to be found in this Frogger 
look alike. The only thing that’s mis- 
sing is a realistic “squelch” your Frog 
makes with the tarmac! 

So as to fit all 12.5K into the 
magazine and allow readers without 
assemblers to play the game, the pro- 
gram comes as two hex_loaders, the 
first appearing this month. At the 
end of each line is a checksum which 
verifies the code in that line prior to 
poking it into memory. If the code is 
incorrect the loader will list the 
offending line. Using this device you 
shovld be able to quickly eliminate 
most if not all typing errors. 
Acknowledgement: Hex loader pro- 
duced using a program generator 
written by R K Loury. 


100 REMark #e## Part? OL Froggy  #teE 

110 REMark ###* For QL User:A Day tttt 

120 DIM array (5): address=RESPR (7000) 

130 start=address:CLS:CLS#O:RESTORE :1in=1000 

140 READ nwords:PRINT lin 

150 IF nwords<=0 THEN PRINT*Load complete’:SBYTES advi_froggy2 
start ,7000;STOP 

160 csum=0sFOR i=0 TO nwords-1:READ array(i):csua=csuptarray (i 
)INEXT i 

170 READ csum2:IF csum<>csua2 THEN PRINT"Checksua error at lin 
e ";linsPRINT*Correct checksua",csum:PRINT"Line of data*:FOR i 
20 TO nwords-1sPRINT,array(i)s","s:NEXT isSTOP 

180 FOR i=0 10 nwords-1:POKE _W address,array(i):address=addres 
St2iNEXT i 

190 lin=lin#10:G0 TO 140 

1000 DATA 6,-21846,-21846,-21846,-21846,-21844,-21846,-131076 
1010 DATA 6,-21846,-21846,-21946,-21844,-21844,-21846,-131076 
1020 DATA 6,-21846,-21846,-21846,-21846,-21B44,-21846,-131076 
1930 DATA 6,-21846,-21846,-21846,-21844,-21846,-21846, -131076 
1040 DATA 6,-2 1846, -21846,~21846,-21844,-21846,-21846,-131076 
1050 DATA 6,-2184,-21846,-21846,-21946,-21844,-2194,-131076 
1060 DATA 6, -21846,-21846,-21846,-21846, -21846,-21844,-131076 
1070 DATA 6,-21846,-21844,-21846,-21946,-21844,-21846, -131076 
1080 DATA 6,-21846,-21846,-21846,-21946,-21844,-21846,-131076 
1090 DATA gant 0,42 - 42,-43608 

1100 DATA 6,42,42,42,42,42,0,2 

1110 DATA 6,42,0, " 42 ea ib 

1120 DATA 6,0,42,0,42,42,42, 148 

1130 DATA 642,42, 42,0442,0, 168 

1140 DATA 6,42,42,42,42,0,42,210 

1150 DATA 6,9,42,42,42,42,42,210 

1160 DATA 6,42,0,42,0,42,42,148 

1170 DATA 6,42,42,0,42,0,42, 148 

1180 DATA 6,42,42,42,42,42,0,210 

1190 DATA 6,42,0,42,42,42,42,210 

1200 DATA 6,8316,2,16392,31757,17402,-266,73603 

1210 DATA 6,31247,30721 8337, 22601, 22400, 20940, 136446 

1220 DATA 6,-8,-11780,0,120, 20941 ,-20,9253 

1230 DATA ,-28!64,0,2040, 20942, -36,8316, 3098 

1240 DATA 6,2,26632,31757,17402,-184, 31247, 106856 

1250 DATA 6,30721 8337, 22601 ,22600,20940,-B, 105191 

1260 DATA &,-11780,0,120,20941 ,-20,-28164 ,-18903 

$270 DATA 4,0, 2040, 20942, -36, 28672, 20085, 71703 

1286 DATA 6,6716,104,24614,6716,0,24608,62758 

1290 DATA 668316,2,6152,-14084, 2048, -11834,-9402 

1300 DATA 4, 6458, 17860, 55, 28384, -17860,5,-618 

1316 DATA 628128, 22853 ,-13572,2,-11835,-19396,6180 

1320 DATA 6,0,28512,- 19396 ,60,27738,31235,68149 

1330 DATA 6,18426,228,-15420,128,-10303, 15379,8238 

1340 DATA 6,-19396,3,28172, 6658, 21317, 20595, 57309 

1350 DATA ,-15108,2,-26686,-19396,57, 27916, -33215 

1360 DATA 6,-27588,56,-26110,-15108,2,-11838,-80586 

1370 DATA 6,30735,-18884,0,26148,12435,-11780,38654 

1380 DATA 6,0,128, 20619, 20940, -18,-28164, 13505 

1390 DATA 6,0,2046,-26628, 0,126, 20994 ,-3462 

1400 DATA 6,20941,-38, 28672, 20085, 12422, 24794 , 106876 

{410 DATA 6,3088,0, 26406, 9288, 9800, 22647, 71249 

1420 DATA 6,7317B,21128, 7186, 5136,3091 159720 

1430 DATA 6,26390,-27642,4226 21128, 6160, 21128,51390 

1440 DATA 6,4624, 30208, 24832,-186, 28672, 20085, 108235 
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1450 DATA 6,-11258, 24808, 14890, 1872,31847,3088, 67247 
1460 DATA 6,0,26372,31232, 29184, 18663, 640, 106091 

1470 DATA 6,25014,19679,320,31232, 29184, 23688, 129117 
1480 DATA 6,20942,-28, 18426, 1836, 23691 ,22155,87022 
1490 DATA 6,3091,11,26134,6716,12,7228,43192 

1500 DATA 6,11 ,5765,5958,12,5957,24, 17727 

1510 DATA 6,28472,20085,6716,11,7228,12,62724 

1520 DATA 6,24808,0,0,0,0,0,24808 

1530 DATA 6,0,0,0,0,0,10,10 

154) DATA 6,160,0,0,10,160,0,330 

1550 DATA 6,2,140,8,0,170,170,510 

1560 DATA 6, 168,42,168,42,170,42,632 

1570 DATA 6,160,42,170,42,160,42,416 

1580 DATA 6,170,42,168,42,170,0,592 

1590 DATA 4,170,170,168,0,2, 160,670 

1600 DATA 6,8,0,0,10,160,0,178 

1610 DATA 6,0,10,160,040,0,170 

1620 DATA 6,0,0,0,0,0,0,0 

1530 DATA 6,0,0,0,0,0,0,0 

1640 DATA 6,0,0,170,42,128,0,340 

1850 DATA ,170,42,128,42,0, 128,510 

1660 DATA 6,40,42, 170,170,168, 42,632 

1670 DATA 6,170,170, 170,170, 170,170, 1020 

1680 DATA 6,170,170, 170,170,170,42,892 

1690 DATA 6,170,170, 170,42, 170,170,892 

1700 DATA 6,168,42,0,128,40,0,378 

1710 DATA 6,170,42,128,0,170,42,552 

1720 DATA 6,128,0,0,0,0,0,128 

1730 DATA 6,0,0,0,0,0,0,0 

1740 DATA 6,0,0,0,0,0,2570,2570 

1750 DATA 6,-24416,0,0,2570,-24416,0,-46262 

1760 DATA 6,0,8224,2570,-32640,0,10794,-11052 

1770 DATA 6,-21846,-21844,0,-21846,-22360,10794,-77104 
1780 DATA 6,-22360,-21846,-22360,2570 , -22360,-21844, ~108202 
1790 DATA 6,-22360,2570,-22360,-21846, 22340, 10794 ,-75542 
1800 DATA 6,-22360,10794,-21846,-21844,0,8224,-47034 
1810 DATA 6,2570,~32640,0,2570,-24416,0,-51916 

1820 DATA 6,0,2570,-24416,0,0,0,-21846 

1830 DATA 6,0,0,0,0,0,0,0 

1840 DATA 6,0,0,0,0,0,0,0 

1950 DATA 6,0,0,0,514,-22360,-21846, 43492 

1860 DATA ,0,514,-22360,-21846,0, 10280, -33412 

1870 DATA 6,514,0,-22360, 10794-21846 ,-21844, -54744 
1880 DATA 6,-22360 ,-21846,-21846, 21846, -22340,-21846,-132104 
1890 DATA 6,-21844,-21846,~21846,-21846,-21844,-21844,-131076 
1900 DATA 6,~21844,-21846, -21846,-21846, ~22340 10794, -98950 
1910 DATA 6,-21044,-21044,-22340, 10280,514,0,-55258 
1920 DATA ,-22360,514,-22360,-21846,0,514,-65538 

1930 DATA 6,-22360,-21844,0,0,0,0,-44208 

1940 DATA 6,0,0,0,0,0,0,0 

1950 DATA 6,0,0,0,0,0,0,0 

1960 DATA 6,0,0,0,2565,-24496,0,-21931 

1970 DATA 6,0,2565,-24496,10773,-32704,-244%6 ,-68358 
1980 DATA 6,2052,10773,-32191 ,-21931 ,-22444,0,-63741 
1990 DATA 6,2565,2565,-21931 ,-21931 ,-22444 2565, 58411 
2000 DATA 6,-22444,-21931 ,-22444, 2565,-22444, 0,-86698 
2010 DATA 6,2565,2565,-21931 ,10773,-32191 -21931 ,-60150 
2020 DATA 6,-22444, 10773, -32704,-24496, 2052, 0,-46819 
2030 DATA 6,0,2565,-24496,0,0,2565,-19346 

2040 DATA 6,-24494,0,0,0,0,0,-24496 

2050 DATA 6,0,0,0,0,0,0,6 

2060 DATA 6,0,0,0,0,0,15, 15 

2070 DATA 6,240,0,0,15,240,0,495 

2080 DATA 6,0,48,15,3,252,63,381 

2090 DATA 4,255, 195,252,255, 240,240, 1437 

2100 DATA 6,0,63, 240,63, 255, 63,484 

2110 DATA 6,240,63,255, 255,240, 240, 1293 

2120 DATA 6,0,63,255,195,252,48,813 

2130 DATA 6,15,3,252,15,240,0,525 

2140 DATA 6,0,15,240,0,0,0,255 

2150 DATA 6,0,0,0,0,0,0,0 

2160 DATA 6,0,0,0,0,0,0,0 

2170 DATA 6,0,0,0,0,0y1,! 

2180 DATA 6,84,0,0,1,84, 21,190 

2190 DATA 6,64,84,1,21,65,85,320 

2200 DATA 6,85,0,5,5517,85, 197 

2210 DATA 6,84,5,17,85,84,5,280 

2220 DATA 6,17,0,555,17,21 ,45 

2230 DATA 6,65,85,85,21,64,84,404 

2240 DATA 6,1,0,0,1,84,0,86 

2250 DATA 4,0,1,84,0,0,0,85 

2260 DATA 6,0,0,0,0,0,0,0 

2270 DATA 6,0,0,0,0,0,0,0 

2280 DATA 6,0,10815,-32576,0,0,10815,-10946 

2290 DATA 6,-32574,0,0,-32576,10815,515,-53822 

2300 DATA 6,-22276,-21761,-21761,-32061 ,-22276,-30516,-150651 
2310 DATA 6,-24336,-24336,0,-30516,-24336,10815,-92709 
2320 DATA 6,-21761,-30516,-24336, 10B15,~21761 ,-30514,-118075 
2330 DATA 6,-24336,-24334,0,-21761 ,-21761 ,-32061 ,-124255 
2340 DATA 6,-22276,-32576, 10B15,515,-22276, 10815, -54983 
2350 DATA 6,-32576,0,0,10815,-32576,0,-54337 

2360 DATA 6,0,0,0,0,0,0,0 

2370 DATA 6,0,0,0,0,0,0,0 

2380 DATA 6,0,0,0,0,0,0,0 

2390 DATA 6,0,0,0,0,0,0,0 

2400 DATA 4,0,0,0,0,0,0,0 

2410 DATA 6,0,0,0,0,0,0,0 

2420 DATA 4,0,0,0,0,0,0,0 

2430 DATA 6,0,0,0,0,0,0,0 

2440 DATA 6,0,0,0,0,0,0,0 

2450 DATA 6,9,0,0,0,0,0,0 


2460 DATA 6,0,0,0,0,0,0,0 

2470 DATA ,0,0,0,0,0,0,0 

2480 DATA 4,0,0,0,0,0,0,0 

2490 DATA &,0,0,0,2,168,0,170 

2500 DATA 6,0,2,148,0,0,40,210 

2510 DATA &,2,0,0,42,170,0,214 

2520 DATA 6,0,42,170,0,0, 170,382 

2530 DATA 6,170,0,0,170,170,0,510 

2540 DATA 6,0,42,170,0,0,42,254 

2550 DATA 4,170,0,0,40,2,0,212 

2560 DATA 6,0,2,168,0,0,2,172 

2570 DATA 6,168,0,0,0,0,0, 168 

2580 DATA 4,0,0,0,0,0,0,0 

2590 DATA 6,0,0,0,0,0,0,0 

2600 DATA 4,0,0,0,10794,-32640,0,-21846 

2610 DATA 4,0, 10794 ,-32640,0,0,-32640,-54486 

2620 DATA 6,10280,0,0,-21846,-22360,0,-33926 

2630 DATA 6,0,-21844,-22340,0,0,-21044,-6052 

2640 DATA 6,-21844,0,0,-21846,-21846,0,-65538 

2650 DATA 4,0,-21846,-22360,0,0,-21844,-4052 

2660 DATA 6,-22360,0,0,-32640, 10280,0,-44720 

2670 DATA 4,0, 10794,-32640,0,0,10794, 11052 

2680 DATA 6,-32640,0,0,0,0,0, -32640 

2690 DATA 6,0,0,0,-21846,-21844,-21944,-65538 

2700 DATA 6,-21846,~21846,-21846,-21846,~21846,-21846,-131076 
2710 DATA 4,-24414,-21846,-21846,-21844,-30070, 10794,-109230 
2720 DATA 6,-21846,-21846, 10794, -30070,-21846, -21844,-106460 
2730 DATA &, 10794 ,-30070,-21844, 2054, ~21846,-30070, -90982 
2740 DATA 6,-23902,514,-21846, 10794, -22360,-21846,-78644 

2750 DATA 4,~21844, 10794,-22360,-21846,-21846, 10794, 66310 
2760 DATA 6,-22360,-2184b,-21846, 30070, -22560,-21844,-140328 
2770 DATA 4,-21844,-30070,-23902,-21846,-21846,-23902,-143412 
2780 DATA 6,~30070,-21846,-21844,-22360,10794,-21844,-107174 
2790 DATA ,~21844,-21844,~21846,-21846,-21946,-21846,-131076 
2800 DATA 6,-21844,-21846,-21846,-21844,-21846,-21846,-131074 
2810 DATA 6,-21844,~22360, 10794,-21846,-21844,~25902,~101004 
2820 DATA 6,-30070,~21846,-21846,-30070,-23902,-21846,-149580 
2830 DATA 4,~21844,-30070,-22360,-21844,-21846, 10794, 107174 
2840 DATA 6,-22360,2570,~21846, 10794,-22360,514, -52488 

2850 DATA 6,-21846, 10794,-22360,-22360,-21846 ,-30070,-107688 
2860 DATA 4,-23902,-21846, 10794, ~30070,-21846,-21846,-108714 
2870 DATA 4,10794,-30070,~21844,-21846,-30070, 10794-82244 
2880 DATA 6,-21846,-21846, 24416, -21846,-21046, ~21846,-133646 
2890 DATA 6,-21846,-21844,-21846,-21846,-21846,-21844,-131076 
2900 DATA 6,~21840,-21846,-21846,~21844,-21844 ,-21846,-131076 
2910 DATA 6,~21846,-21844,~21846,-21846y-21844,-21844,-131076 
2920 DATA 6,-21846,~21844,-21844,-21844,-21846, ~21846,-131076 
2930 DATA 6, -21844,-21846, -71846,-21844,-21846, 71846, -131076 
2940 DATA 6,~21846,-21846,-21844,-21844,~21846,-21844,-131074 
2950 DATA 6,-21844,-21846,~21846,-21844,-21844,-21844,-131074 
2960 DATA 6,-21844,-21846,-21846,-21844,-21844,-21846,-131076 
2970 DATA 6,-21846,-21844,-21844,-21846,-21846,-21944,-131076 
2980 DATA 6,-21846,-21846,-21844,-21844,-21944,-21844,-131076 
2990 DATA 6,~21846,-21846,-21844 21944-21846, -21844,-131074 
3000 DATA 6,-21846,-21846,-21846,-21844,-21844,-21846,-131076 
3010 DATA 4,-2184,-21846,-21844,300,1293,2,-63943 

3020 DATA 6,298, 1291,2,374,1293,2,3260 

3030 DATA 6,372, 1292,2,458,1293,2,3419 

3040 DATA 6,456,1291 ,2,504, 1538, 258, 4049 

3050 DATA 4,500, 1539,258,496, 1544, 258, 4597 

3060 DATA 6,424, 1538,258,420, 1539, 258, 4437 

3070 DATA 6,416, 1546,258, 452, 1538, 258, 4448 

3080 DATA 6,448, 1546, 258,397, 1538, 258, 4445 

3090 DATA 6,466, 1544, 258,448, 1543, 258, 4537 

3100 DATA 6,428, 1544, 258,430, 1543,258,441 

3110 DATA 6,458, 1544,258,440,1543,258, 4521 

3120 DATA 6,393,1539, 258,389, 1546, 258, 4383 

3130 DATA 6,275, 1538,258,271,,1539, 258, 4139 

3140 DATA 6,267, 1539, 258,263, 1546, 258, 4131 

3150 DATA 6,358, 1538,258,354, 1544, 258, 4312 

3160 DATA 6,328, 1538, 258,324, 1539, 258, 4245 

3170 DATA 6,320, 1546,258,311,1544,258,4237 

3180 DATA 6,313, 1541, 258,475, 1544, 258, 4399 

3190 DATA 6,477, 1543,258,288, 1544, 250, 4348 

3200 DATA 6,290, 1543,258,304, 1544, 258, 4197 

3210 DATA 6,306, 1541, 258,373, 1544, 258, 4280 

3220 DATA 6,375, 1541 ,258,265,1797,260,4496 

3230 DATA 6,261 ,1800,260,273,1799,260,4453 

3240 DATA 6,269, 1800,260,357,1797,260,4743 

3250 DATA 6,353, 1800, 260,40! ,1799, 260, 473 

3260 DATA 6,397, 1800,260,457,1799,260,4973 

3270_DATA 6,453, 1800, 260,287,1797,260, 4857 

3280 DATA 6,283, 1800,260,301 1797, 260,4701 

3290 DATA 6,297,1800,260,312,1799, 2604728 

3300 DATA 6,308, 1800,260, 273, 2054.4, 4499 

3310 DATA 6,277,2054,4,321,2052,4,4714 

3320 DATA 6,325, 2054,4,389,2052,4, 4830 

3330 DATA 4,393,205, 4,437,2052,4,4946 

3340 DATA 6,441,2056,4,356,2054,4,4915 

3350 DATA 6,360, 2056,4,368,2052,4,4944 

3360 DATA 6,372, 2056,4,424,2052,4,4912 

3370 DATA ,428,2056,4,481 ,2052,4,5025 

3380 DATA 6,485, 2054,4,294,2054, 44997 

3390 DATA 6,298,2056,4,275,2304,2,4939 

3400 DATA 6,279,2305,2,283,2313,2,5184 

3410 DATA ,309,2312,2,307,2308,2,5240 

3420 DATA 6,446 ,2304,2,450,2313,2,5517 

3430 DATA 6,257,2304,2,261,2313,2,5139 

3440 DATA 6,379,2312,2,377,2308,2,5380 

3450 DATA 6,411,2312,2,409,2310,2,5446 

3460 DATA 6,503,2312,2,501 ,2310,2,5630 


3470 DATA 4,292,2312,2,290,2310,2,5208 

3480 DATA 6,345,2312,2,343,2308,2,5312 

3A90 DATA 6,460,2304,2,464,2305,2,5537 

3500 DATA 6,448,2313,2,354,2304,2,5443 

3510 DATA 4,358, 2305,2,362,2513,2,5342 

3520 DATA 6,326,2304,2,330,2305,2,5269 

3530 DATA ,334,2313,2,85,85,05,2904 

3540 DATA 6,85,85,05,85,85,85,510 

3550 DATA 6,86,170,170,85, 90,140,761 

3560 DATA 6,2,85,106,170,170,85,618 

3570 DATA 6,104,2,138,85, 170,170,449 

3580 DATA 6,148,05,162,128,170,85,798 

3590 DATA 6,170,170, 148,85,170,170,933 

3400 DATA 6,170,85,104,10,8,85,462 

3610 DATA 6,106,170; 170,85,90,160,781 

3420 DATA 6,10,85,86,170,170,85,606 

3630 DATA 4,85,85,85,85,85,85,510 

3640 DATA 6,85,85,85,85,85,85,510 

3650 DATA 6,85,85,85, 170,170,170, 765 

3660 DATA 6,170,0,40,10,138, 170,528 

3470 DATA 6, 170,170,170,138,170, 138,954 

3680 DATA 6,170,170,0, 168, 2,2,512 

3690 DATA 4,170,170, 170,170, 130,130,940 

3700 DATA 4,170,170, 170,170,170,2,852 

3740 DATA 4,10,0,170,170,170,170,690 

3720 DATA 6,170,160,42,160,10,170,712 

3730 DATA 6,170,170,170,85,85,85, 765 

3740 DATA 6,85,85,85,95,85,85,510 

3750 DATA 6,85,85,85,95,85,85,510 

3760 DATA 6,85,170,170,170,170, 130,895 

3770 DATA 642,128, 168,170, 148,170,846 

3780 DATA 4,160, 128,170,128, 160,170,916 

3790 DATA 6,138, 170,128,160, 168,2, 764 

3800 DATA 6,128,170, 170, 170,128,170,936 

3810 DATA 6,170,168, 128,162, 136,10,774 

3820 DATA 6,140,170,170,170,140, 160,990 

3830 DATA 6,10,138, 168,170,170, 170,824 

3840 DATA 6,170,85,85,85,85,85,595 

3850 DATA 6,85,95,85,85,85,85,510 

3860 DATA 6,85,85,-24571 ,85,2640,85,-21591 

3870 DATA 6,-24570,170,2704,85,90,170,-2135 
3880 DATA 6, 145,85, 106,170,169, 10305, 11000 

3890 DATA 6,170,170, 170,-22016,42,170,-21294 
3900 DATA 6,170,-22016, 42, 170,170,-22016,-43480 
3910 DATA 6,42,170,170,-22016,42,170,-21422 
3920 DATA 6,170, 10305, 170,170,170 85, 11070 

3930 DATA 6,106, 170,169,85,90,170, 790 

3940 DATA 6,165,85,-24570,170,2704 85, -21361 
3950 DATA 6,-24571 ,85,2640,85,85,85,-21591 

3960 DATA 6,85,85,85,85,85,85,510 

3970 DATA 6,85,85,85,85,85,85,510 

3980 DATA 6,85,85,5,85,85,85,510 

3990 DATA 6,85,85,85,85,85,85,510 

4000 DATA 6,85,85,85,85,85,85,510 

4010 DATA 6,85,85,85,85,85,85,510 

4020 DATA 6,85,85,85,85,85,85,510 

4030 DATA 6,85,85,85,95,85,85,510 

4040 DATA 6,85,85,85,85,85,85, 510 

4050 DATA 6,85,85,85,85,85,95,510 

4060 DATA 6,85,85,85,85,85,8192,0617 

4070 DATA ,8192,8192,8192,8192,4170, 7198, 46136 
4080 DATA 6,8224,8224,8224,8224,6170, 7198, 46264 
4090 DATA 6,170, 7198,8224 ,8224 8224, 8224, 46264 
4100 DATA 6,8224,6170,7198,6170,7198,4170,41130 
A110 DATA 6,7198,8224,8224,8224,8224,8224, 48318 
4120 DATA 6,8224,6170,7198,8224 8224 ,8224, 46264 
4130 DATA 6,8224,8224,8216,6494,7712,8216,47276 
4140 DATA 6,6684,7712,8224 ,8224 8224 ,8224, 47292 
4150 DATA 6,8224,8224,8224 92248224, 9214, 49334 
4140 DATA 6,5138,4110,3082,2062, 3082, 2054, 19528 
4170 DATA 6,1026,32,8224,8224 8224 ,8224, 33954 
4180 DATA 6,8224,8224,8224,8224,8224,8224, 49344 
4190 DATA 6,8224,8224,8214,5138,4110,3078, 36988 
4200 DATA 6,1026,32,8224,8224,8224,8224, 33954 
4210 DATA 6,5652,4624, 3594, 2568, 1540,512, 18492 
4220 DATA 6,8224,8224,8224,8224,8224,8224, 49344 
4230 DATA 6,8224,8224,8224,8224,8224,8224, 49344 
4240 DATA 6,8224,8224,8214,5138,4110,3082, 36992 
4250 DATA 6,2062,3082,2042,3082, 2054, 1026, 13368 
4260 DATA 6,32,8224,8224,8224,8224,8224, 41152 
4270 DATA 6,8224,8224,8192,0224 82249224, 49312 
4280 DATA 6,8224,8224,8216,6684,7704, 4684;45736 
4290 DATA 4,7712,8224,8224,8224, 8224 ,8224, 48832 
4300 DATA 6,8224,8224,8224,8224,8214, 4684, 47796 
4310 DATA 67704, 4684,7704 ,6694,7712,8224, 44712 
4320 DATA 6,8224,8224,8224,8224,8224,8224, 49344 
4330 DATA 6,8224,8224,8224 ,8224,8224,9224, 49344 
4340 DATA 6,8224,8224,8224,8274,8224,8224, 49344 
4350 DATA 6,8224,6170,7198,6170,7198,8224, 43184 
4340 DATA 6,8224,8224,8224,0224,8224,8224,49344 
4370 DATA 6,8224,8224,8224,8224,8224 4170, 47290 
4380 DATA 6,7198,6170,7198,8224 82248224, 45238 
4390 DATA 6,8224,8224,8224,8224,8224,9224, 49344 
4400 DATA 6,8224,8224, 8224,8224,8224,8224, 49344 
4410 DATA 48224 ,8224,8224,9224,8224 ,8224, 49344 
4420 DATA 6,8246,6684,7712,8224 ,8216 6684, 45736 
4430 DATA 6,7712,8224,8224 82248224, 8224, 48832 
4440 DATA 6,8224,8224,8224,6170,7198,8224, 46264 
4450 DATA 4,8224,8224,8224,224,8224,8224, 49344 
4440 DATA 6,8224,8224,8224,8224,8224,0224 49344 
4470 DATA 6,8224 ,8224,8224, 4170,7198,8224, 46264 


4480 DATA 6,8224,6170,7198,8224,8224,8224, 46264 

4490 DATA 6,8224,8224 ,8192,8224 8224 8224 , 49312 

4500 DATA 6,8224,5652,4624,3596,2568, 3596, 28260 

4510 DATA 6,2568,1540,512,8224 8224, 8224 29292 

4520 DATA 6,8224,8224,8224,8224,8224,8224 49344 

4530 DATA 6,8224,8224 8224 ,8224 82248224, 49344 

4540 DATA 6,8224,8224,8224,8224,8224,8224 49344 

4550 DATA 6,8224,0224 ,8224,0224 82248224, 49344 

4560 DATA 6,8224,5652, 4624, 3596, 2568, 35%, 28260 

4570 DATA 6,2568,1540,512,8224,8224,8224, 29292 

4580 DATA 6,8224,8224,8224,8224,8224,8224,49344 

4590 DATA 6,8224,8224 ,8224,8224,8224 8224, 49344 

4400 DATA 6,8224,8224,8224,8224 ,8224,8224 49344 

4410 DATA 6,8224,8224,8224 8224, 5652, 4624 , 43172 

4620 DATA 6,3596,2568,3596 , 2548, 1540,512, 14380 

4430 DATA 6,8224,8224 8224 ,8224,8224,8224, 49344 

4440 DATA 6,8224,8224,8224,0224 82248224, 49544 

4450 DATA 4,8224,8224 ,8224,8224, 8224, 8224, 49344 

4460 DATA 6,5652, 4624, 3596, 2568, 3596, 256B, 22604 

4470 DATA 6,1540,512,8224 8224 ,8224,8224, 34948 

4480 DATA 6,8224,8224,8224,8192,8224,8224, 49312 

4490 DATA 6,8224,8224,8224,8224,8224,8224, 49344 

4700 DATA 6,8216,6684,7704, 6684, 7712,8224 45224 

4710 DATA 6,8224,8224,8224,8224,6170,7198, 46264 

4720 DATA 6,8224,8224,8224,0224,8224,8224, 49344 

4730 DATA 6,8224,8224 8224 ,8224 8216, 4484, 47796 

4740 DATA 6,7704,6684,7704,6684,7712,8224, 44712 

4750 DATA 6,824,824 8224 ,8224,8224,8224, 49344 

4740 DATA 6,4170,7198,4170,7198,8224,0224, 43184 

4770 DATA 6,6170,7198,8224,8224,8224,8224 , 44264 

4780 DATA 6,8224,8224,8224,8224,8224,8224 49344 

4790 DATA 6,8224,4170,7198, 2688, 10912,-21848, 13544 

4800 DATA 6,-22008,-22008,-22008,-22008, ~21848,-21848,-131728 
4810 DATA 6,-21848, 10912, 10912, 10912, 10912,2720, 24520 

4920 DATA 4,2720,2720,2720,2720,-21849,-21848, -32816 

4830 DATA 6,-21848,-21856,-21049,-21848, 168, 10920, -76312 

4840 DATA 6,-21848,-21856, -22528,-21848, -21848, 10920, -99008 
4950 DATA 6,-21856,-21848,~21948, 168,2728,2728,-59928 

4840 DATA 6,2728,168,-21848,-21848,-21856, -22360,-B5016 

4870 DATA 6,-22360,-22360,-22360,-21848, -21848, 10920,-99856 
4880 DATA 6,148, 168, 168, 168, 10920, -21848,-10256 

4890 DATA 6,-21848, -22528,-21854,-21848, 10920, 168,-76992 

4900 DATA 6,-21848,-21848,-21856, 10912,-21854, -21854, -98352 
4910 DATA 6,-22528,-21856, ~21848,-22340,-22360,-22360,-133312 
4920 DATA 6,-21848,10912,-21048,-21848,-21848, 480, -75800 

4930 DATA 6,680, 680,2728, 10912, -21888,-22016,-28904 

4940 DATA 6,-22016,10912,-21848,~21848, -22360,-21848,-99008 
4950 DATA 6,10912,-21848,-22340,-21848,-21848, 10912, -4080 
4960 DATA 6, 10912,-21B48, ~22360 -22360, -22360,-21848,-99864 
4970 DATA 6,10920, 148, -21848,-21848,-21856,0,-54464 

4980 DATA 6,0,0,0,0,0,0,0 

4990 DATA 6,0,0,0,0,10912, 21848, -10936 

5000 DATA 6,-21848,-22340,-2184B,-21848,-21848,-22360,-132112 
5010 DATA 6,-22340,-22360,-22340,-21888,-21854, -21856, -132680 
5020 DATA 6,-22368,-21888,-21854,-21848,-22360,-21848,-132168 
5030 DATA 6,-21848,-21854,10912,-21848,-21848,-22360,-98848 
5040 DATA 6,-22528,-22528 ,-22528,-22340,-21848,-21848,-133640 
5050 DATA 6,10912,-21854,-21848,-21848,-22360,-22340,-99340 
5060 DATA 6,-22360,-22360,-22360,-21848,-21848,-21856,~132632 
5070 DATA 6,10920,~21848,-21848, -22528 , -21888, -21888, -99080 
5080 DATA 6,-21888,-22528,-21848,-21848, 10920, 10920, -66272 
5090 DATA 4,-21848,-21848,-22528, -21888,-21888,-21888,-131888 
5100 DATA 6,-22528,-22528,-22528 ,-22528, 10912,-21848,-101040 
5110 DATA 6,-21948,-22360,-22528 , -22340,-22340,-22340 ,-133816 
5120 DATA 6,-21848,~21848, 10912, -22360 ,-22360,-22360,-99864 
5130 DATA 6,-22360,-21848, -21848, -21848,-22340,-22360,-132624 
5140 DATA 6,-22360,-22360,-21848,-21848, 21848, 2688, -107576 
5150 DATA 6,2688, 2688, 2688, 2488, -21848,-21848,-32944 

5140 DATA 6,-21848,-21856,-21848,-21848,168, 168, -87064 

5170 DATA 6,168,-22360,-22340,-21848,-21848,10912,-77336 

5180 DATA 6,-22360,-22360,-22360,-22360,-21856,-21856,-133152 
5190 DATA 4,~-21854,-22340,~-22340 , -22340, -22340 ,-22528, -133824 
5200 DATA 6,-22528,-22528, -22528, -22528, -22528,-22528,-135148 
5210 DATA 6,~22528,-21848, 21848, -21848,-22340 ,-21848,-132280 
5220 DATA 6,-21848,-2184B, -21848, -21848,-22360,-22360,~132112 
5230 DATA 6,-22340,-22360,-2230,-21848,-21848, -21848, -132624 
5240 DATA 6,-22360,-22340,-22360,-22360,-22360,-22360,-134140 
5250 DATA 4,-22360,-22340, 2688, 10912,-21848,-22008,-74976 
5260 DATA 6,-22008,-22008,-22008,-21848,-21848,-21848,-131568 
5270 DATA 6,10912,-21856, 21848-21848, -22340 ,-21848,,-98848 
5280 DATA 6,-21848,-21856 , -22528,-22528, -22528 ,-22528,-133816 
5290 DATA 6,2688, 10912, ~21848, -22008,-22008, -22008,-74272 
5300 DATA 6,-21976,-21848,-21848,-21848, 10920,-21856,-98456 
5310 DATA 6,-21849,-21848,-22360,-21848,-21856,-21848, -131608 
5320 DATA 6,-22360,-22340,-22360,-22360,10920,-21848,-100369 
5330 DATA 6,-21848,-22528,-21854 ,-21848, 10920, 168, -76992 

5340 DATA 6,-21848,-21848, -21856,-21848, -21848,-21848, -131096 
5350 DATA 6,2688, 2688, 2688, 2688, 2688, 2688, 1128 

5360 DATA 6, 2688, 2688, -22360,-22360,-22360,-22360,-B4064 
5370 DATA 4,-22360,-22360,-22360,-22360,-21848,~21848,-133136 
5380 DATA 6,10912,-22360,-22360, ~22360 ,-22360,-22360,-100888 
5390 DATA 6,-22360,-22360,-21848,-21048, 10912, 2688,-74814 
5400 DATA 6,-22360,-22340,-22360,-22360,-22360 ,-21B4B,-133649 
5410 DATA 6,-21848,-21848,-21848,-21848, -22360,-22360,-132112 
5420 DATA 6,-22360,-22360,-22360, 2688, 2688, 2688, -59016 

5430 DATA 6,-22360,-22360,-22360,-22360 ,-22360,-22360,-134169 
5440 DATA 6,-22360,-22340,-21848,-21848, 10920, 18, -77328 

5450 DATA 6,-21848,-21848,-21956,-21048,-21048, -21848, -131096 
5460 DATA 6,168,672, 2688, 10752,-22528, -21848, -300%6 

5470 DATA 6,~21848,-21848,0,0,0,0,-436%6 

5480 DATA 6,0,0,0,0,2688,2688,5376 


® 


5490 DATA 62688, 10400, 10400, 10400, 10400,0,44288 

5500 DATA 6,0,0,0,0,0,0,0 

5510 DATA 6,2688,2688, 2699, 2688, 2688, 2688, 14128 

5520 DATA 6,2688,0, 2688, 2688, 2688,-21844,-11094 

5530 DATA 6,-21846,-21844,0,0,0,0,-43692 

5540 DATA 4,0,0,0,0,0,-21844,-21846 

5550 DATA 6,-21846,-21846,-21844,-21844,-21846, 21846, -131076 
5560 DATA &,-21845,-21846,0,0,2730, 10922-30040 

5570 DATA 6,-21846,-21844,-21844,-21844,-21846, 10922, -98308 
5580 DATA 6,2730,0,0,-21856,-21848,-21846, 62820 

5590 DATA 6,~21846,-21046,-21044,-21846, -21849, -21854,-131088 
5600 DATA 6,0,0,0,0,0,0,0 

5610 DATA 4,0,0,0,0,0,0,0 

5620 DATA 6,0,0,0,0,0,0,0 

5430 DATA 6,2048,391 0, 20384, 2048,394,33267 

5640 DATA 6,0,29714,2048,402,0,28082, 60246 

5450 DATA 6,2048,408,0,25078,2048,414, 29996 

5660 DATA 4,0,25058,2048,420,0,26212,53738 

5470 DATA &,2048,427,0,26236,2048,437,31196 

5680 DATA 6,0, 26236,2048,446,0,26316,55046 

5490 DATA &,2048,452,0,29672,2048,457, 34677 

5700 DATA 6,0,29668,2048,462,0,26062,58240 

5710 DATA &,2048,467,0,30714, 2304 ,473,36006 

5720 DATA 6,0,30950,2304,478,0,30956, 64488 

5730 DATA 6,2304,483,0,30962,2304, 498, 34541 

5740 DATA 6,0,3096B,2304,493,0,30974,44739 

5750 DATA ,2304,497,0,30980 2304, 501 , 36586 

5760 DATA 6,0,30986,2304,505,0,30992, 64787 

5770 DATA ,2304,508,0,30998,2304,514, 36428 

5780 DATA 6,0,31004,2304,518,0,31010, 64836 

5790 DATA 6,2304,523,0,31016,2304,527, 36474 

5800 DATA 6,0,31022,2304,531 ,0,31028, 64085 

5810 DATA 6,2304,535,0,31100,2304,539, 36782 

5820 DATA 6,0,31200,2304,543,0,31040,45107 

5830 DATA 6,2304,547,0,31186,2304,550, 36891 

5840 DATA 6,0,31224,2304,555,0,31232,45315 

5850 DATA 6,2304,582,0,31242,2304,569, 36981 

5860 DATA 6,0,31276,2304,575,0,31310, 65465 

5870 DATA 6,2304,579,0,31364, 2304, 586,37137 

5880 DATA 6,0,31450,2304,591 ,0,31570,45915 

5890 DATA 6,2304,596,0,31708,2304, 603, 37515 

5900 DATA 6,0,31298, 2304, 611,0,31548, 65761 

5910 DATA 6,2304,615,0,31610, 2304, 620,37453 

5920 DATA 6,0,31784,2304,625,0,31690 66403 

5930 DATA 6,2304,630,0,31778,2304,636,37652 

5940 DATA 6,0,31468,2304,642,0,31348,45762 

5950 DATA 6,2,647,-1,-1,2,653,1302 

5960 DATA 6,-1,-1,514,659,-1,-1,1169 

5970 DATA 6,0,-1,0,0,258,-1,256 

5980 DATA 6,0,0,20036,2031 1, 1602, 20306 62255 

5990 DATA &,17477,20995,18744,19205,21332, 21065, 118040 
6000 DATA 6, 20485, 20545, 20549, 20997, 16972, 20291 , 119839 
4010 DATA 6, 19203,20545,19974, 21315, 1360, 21065, 103462 
6020 DATA 6,20052,850,21838,1107,21583, 20485, 85915 
6030 DATA 6, 18766 ,20565,21510,22345, 20036, 2031 1, 123533 
4040 DATA 6, 1602,20306,17477,20995, 18766, 19205, 98351 
6050 DATA 6,21332,21065,20405, 20545, 20549, 20997, 124973 
6060 DATA 6,16972, 20291 ,19203,20545,19974, 21315, 118300 
4070 DATA &,1360,21065,20052,850, 21838, 1107,66272 

6080 DATA 6,21583, 20485, 18746, 20565, 21510, 22345, 125254 
4090 DATA &,20036,20311 1602, 20306, 17477,20995, 100727 
6100 DATA 6, 18766, 19205, 21332, 21065, 20485, 20545, 121398 
4110 DATA 6,20549,20997,16972, 20291 ,19203, 20545, 118557 
6120 DATA 6,19974,21315,21071,,19532, 1347, 21321 ,104560 
6130 DATA &,23109, 1350, 19521 ,21320, 1365,20034,86701 
6140 DATA 6,17746, 1103, 22085, 20998, 17237,21075, 100244 
6150 DATA 6,20306,577,21509, 21315, 16716, 17669, 9092 
6160 DATA 6,20559,18766,21508, 19529, 20037, 1861 , 102260 

6170 DATA 6,19532,18748, 21317, 1603, 18770,17228,97218 
4180 DATA 6,17667,16722,17159, 20559, 18766,21599, 112472 
6190 DATA &,20996,21589,21070, 1620, 21842, 20052, 107149 
4200 DATA 6,20229,20549,20053, 20487, 20549, 20036,121903 
6210 DATA ,20311,19972,19791 22085, 1100, 18771, 102030 
6220 DATA 6, 21508, 2030417742, 1347 ,19535,21317,101753 
6230 DATA 6,1606,20304, 19777 ,21508, 17231 ,20569, 100997 
6240 DATA 6,1603,20304,22879, 19974, 17477, 19525, 101762 

6250 DATA 6,21573,836, 18770, 1093,22597, 17158, 82027 

6260 DATA 6,17752, 17731 ,24407 1612, 16985,21573, 100060 

6270 DATA 6,21253,21317,22597,,17158, 21314, 22868, 126507 
6280 DATA 6,17747,1107,16726, 17669, 19781 ,21063,94093 
4290 DATA 6,17668,19794, 21038, 1100,20289, 17412, 98101 
6300 DATA 6, 19538, 21838, 844, 17751 , 1347, 19525, 80845 
6310 DATA 6, 16722, 1871 ,20549, 20043, 18764,2127,80098 
6320 DATA 6,20549, 20063, 20037,22275, 17228, 21252, 121404 
4330 DATA 6,17217, 19532, 1362,17731 ,20300, 2386, 78528 
6340 DATA 6, 16718,17487,19785,21317 1360, 16725, 93392 
8350 DATA 4,21317,1104,20299, 17470, 20559, 19269, 100218 
8360 DATA 6,24407,1616,20299, 17759, 19460, 16761 ,100502 
4370 DATA 6,21828, 1090, 17733, 20488, 17231 ,20052, 98422 
6380 DATA 6, 18766, 21829, 1362,17748,21081,1106,81892 
8390 DATA 6,17729,17411, 20037, 21508, 19791 17477, 113953 
6400 DATA 6, 1362,17742,21837, 1348, 19529, 20037, 81855 
6410 DATA 6, 1363, 17473, 21573, 1345,17487, 19785, 7902 
6420 DATA 6,21317,1360,16725, 21317, 1104, 20299, 82122 
6430 DATA 6,17670,20559, 19269, 24407, 1614, 20299, 103820 
6440 DATA 6,17759,19460, 16961 21828, 1090, 17733, 94831 
6450 DATA 4,20488, 17231 ,20052, 18766, 21829, 1362, 99728 
6460 DATA 6,17748,21081 ,1106,17729, 17411,20037, 95112 
6470 DATA &,21508, 19791 ,17477 ,1362, 17742,21837, 99717 
6480 DATA 6, 1348, 19529, 20037, 1343, 17473, 21573 81323 
6490 DATA 1,1345, 1345 

6500 DATA -1 
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Helping you to make use of 
your QL to better effect is the 
laudable aim of Maximize 
Your QL by Susan Curran and 
Ray Curnow. Published by 
Papermac at £8.95, it reckons 
it starts where the QL User 
Guide ends, looking in detail 
at points not fully covered in 
the official manual and 
“taking a more critical look at 
the QL’s shortcomings”. 

True to its word, it does not 
spend a lot of time explaining 
the basics. It prefers that the 
reader has a user manual to 
hand, and assumes a basic 
understanding of computers 
and BASIC programming. 

Topics covered include 
using a printer with the QL, 
working with the Psion 
applications, SuperBasic, 
graphics, and using files and 
microdrives. There are also 
chapters on the more technical 
areas of QL computing, 
including the internal 
workings of the machine, 
memory management, QDOS, 
plus a look at the QLAN local 
area network. 


The book is well-written and 
well put together, and does a 
great deal to spell out quite 
clearly who it is for — the 
relatively inexperienced user 
who has picked up the 
essentials of SuperBasic and 
has perhaps run through the 
Psion software, and now wants 
to do more with the computer 
and investigate the way it 
works. There are plenty of 
program listings, mostly in 
SuperBasic but including a 
couple of machine code 
utilities, and there are also 
some suggestions for actual, 
business-orientated 
applications using Abacus, 
Archive, Easel and Quill. 
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The authors have done a 
good job filling in some of the 
gaps.in the QL’s own user 
documentation, but if and 
when you decide to concentrate 
on specific topics — perhaps on 
setting up an elaborate 
database, or learning to write 
sophisticated assembly 
language programs — you'll 
need more detailed coverage 
than this book provides. 

Lots of books have appeared 
dealing with the Psion 
programs that come bundled 
with the QL; now, not to be 
outdone, Longman has 
brought out a series under the 
general heading Working with 
the Sinclair QL. 

True, two books in the series 
deal respectively with 
SuperBasic, and graphics and 
sound, but Abacus wins two 
whole books to itself, and 
another book deals exclusively 
with Archive. 

Word Processing with QL 
Quill by David Dempster is 
aimed at everyone from 
computer novices to 
experienced typists and word 
processor operators. This isa 
common approach that does 
not always succeed, but this 
particular book is so well 
organized that anyone 
interested in Quill who does 
not already know it inside out 
should find something. 

The beginner, for example, 
should read through the book 
from start to finish and 
attempt all the exercises. 
Experienced computer users 
are first directed to chapters 2, 
3 and 4, which deal with 
loading Quill and basic 
editing, then on to the 


printing techniques. 
Experienced word processor 
users are advised to consult 


chapters looking at advanced 
editing, formatting and 


A slightly different format for this month 's book collection, reviewed by Nicky Trevett. 


Appendix 4, which acts as a 
quick reference guide and —a 
nice touch, this — directs the 
reader after a brief description 
of each command to the page 
where he or she can find more 
information. 

There are several books 
‘available on QL Quill, but 
there is room for a book like 
this — encouraging, 
unalarming, and worth 
keeping on the shelf asa ~ 
handy reference guide. 

It seems safe to assume that 
if you bought a QL, you are 
keen to put your computer to 
some use other than games. 
Clive Prigmore’s 30 Hour 
Useful Home Computing, 
published by Century at £8.95, 
has its heart in the right place. 
It aims to show people running 
small businesses, clubs, shops 
and societies how to use their 
computer to process 
documents, build 
spreadsheets, create 
databases, carry out stock 
control, do the accounts and so 
on. 
Unfortunately, it is not 
devoted to any one computer. 
The book is aimed at the 
“home micro user”, which 
seems to include such 
machines as the Spectrum, 
Commodore 64, Tandy, BBC 
and Amstrad as well as the 
QL, and some users might well 
bristle to find their computer 
included in such company. 

Although many computing 
and software concepts are 
broadly the same whatever 
the machine, it was not wise to 
include the QL user among the 
potential readership. The QL 
is supplied with a sophisticated 
suite of business packages 
which can between them more 
than handle the kind of tasks 
named above, and an extensive 
library of books devoted to 
business applications 
specifically on the QL already 
exists. 


Finally, another bible for 
the 68000 enthusiast. 
Mastering the 68000 
Microprocessor by Phillip 
Robinson, published by 
American company Tab Books 
is, according to the blurb, an 
“exceptionally complete 
resource”. It’s aimed at serious 
devotees of the 68000 chip — 
those interested in hardware 
design or assembly language 
programming on the various 
mini and microcomputers 
based on the 68000 family, and 
it includes a look at the 68008; 
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but only to outline the 
functional differences between 
it and the parent chip. 

The book is sweeping in 
scope, putting “The 
Microprocessor” in perspective 
generally, and examining its 
history and “design 
philosophy”. There is a brief 
chapter on the architecture of 
the processor, but the greater 
part of the work is given over 
to software matters — the 
registers, addressing, 
instruction groups, the 
instruction set, interrupts and 
exceptions and assembly 
language. 

There’s also a handy chapter 
on the various members of the 
family, including the 68008, 
plus a look at the systems 
which make use of it — the 
Sinclair QL, IBM System 
9000, Apple Lisa and 
Macintosh, to name a few. 

It’s written in a 
straightforward, even lively, 
manner, and there are plenty 
of diagrams, charts and tables 
throughout.to illuminate the 
text. It could be a useful 
addition to anyone’s 68000 
reference library, but 


~ particularly so to those still 


relatively new to the subject. 


CLASSIFIED 


PAYROLL AND ACCOUNTS SYSTEMS 


* WEEKLY, MONTHLY OR 4 WEEKLY & TAX, NI. P60, P35 CALCULATION 
* USER DEFINABLE DEDUCTIONS * COIN ANALYSIS/PAYMENT ROUNDING 
* SUPPORT COVER AVAILABLE 


£55 including postage and packaging (please add 15% VAT) 


Further details of this and other packages for Stock, etc, are available from: 


TR COMPUTER SYSTEMS 


HEATHFIELD, HINE HEATH, STANTON, NR. SHREWSBURY, SALOP SY4 4NA 
Telephone: (093 924) 621 


NEMESIS 2: 
ADVENTURE 
BEGINS... 
FROM ALCHEMIST 


You are a lone adventurer on a vital and dangerous mission — to capture the 
most wanted man in all the galaxy - NEMESIS. 


This is a vivid, imaginative and atmospheric text adventure, (contained on two 

microdrive cartridges), taking the player on an apocalypic journey through a 

mysterious world. 
Hundreds of locations Huge vocabulary, full sentence phrasing 


Send Cheque or P/O for £12.50 inc. p&p to: 


PAUL P. BRITTAIN 
5 Forster Street, Gainsborough, Lincs. DN21 2LL. 


REVISION on the QL by PADDY SOFTWARE 


Q REVision — the structured, clear & concise data is independent of Q REV. Hence, 
subjects can be used interchangeably. Purchase Q REV once with the 1st subject — just 
buy data thereafter 
Subjects at ‘O’ Level: 

Q PHYS, Q CHEM -— both cover most of all syllabuses. 

Q HIST — Gladstone, Disraeli, Eastern Question 1874-8, Liberals 1906-14, Salisbury, 
Parliamentary Reform, Clash with the Lords, Women & the Vote, Trade Unions, WWI (West- 
ern Front, Causes, at Sea, against Turkey, at Home) in 111 files. 

Q VERB — testing of 40 French Verbs — regular, irregular, reflexive. Especially-written line 
editor allows accents to be added/changed/removed (visibly) as you type. Verbs, tenses & 
persons can each be selected by the user or generated randomly. 

37 FREE m/code extensions to SuperBasic (better screen/file handling, etc) supplied with 
every Q REV or Q VERB. 

Prices include p&p, VAT & full instructions - Overseas orders £1 extra 
Q REV & 1st subject £12 - Additional subjects £7 - Q VERB (French) £8 
Phone 0726 83 2718 or send SAE for details to: 

PADDY SOFTWARE, Paradise Cottage, Golant, Fowey, Cornwall PL23 1LH. 


A PROGRAMME OF LINKED COURSES. 


INTRODUCTORY & ADVANCED APPLICATIONS. 
044 282 7302 Freepost, Tring, Herts. HP23 4BR. 


BONGOLIA ESCAPE 


Gain your freedom from a fascist dictator. Here are 3 challenging games linked together: 
Attack: Protect planet earth from alien spaceships. 
Code-cracker: Crack the code of a combination lock. 


Island: Manage an island under seige. 
Price only £34.50 including postage. Please send Cheque/PO to:- 


Tropic Software Co. 


25 Rossway, Northwood, Middlesex HA6 3HU_ Tel: (09274) 27497 


Home Accounts and Budgets 
PLAN BUDGETS on ABACUS — 40 different categories of income 
and expenditure. Predict monthly cash flow. 

INTEGRATE BUDGET into SuperBasic programme running two 
accounts. 

EACH ACCOUNT has the following features: * 70 entries per month. 
* Automatic copying of all entries. * Automatic entry of regular 
monthly payments. * Allocation of each entry to chosen category. 

* Comparison between budgeted and actual amounts of income and 
expenditure. 

FULLY DOCUMENTED 

SUITABLE PRINTER will produce account statements, budgets and 


budget reviews. £15.00 inc P&P to 


S.L. Services, PO Box 16, Dunstable, Beds. LU6 2QS 
Telephone: 0582 872653 


| N V E S T O R S ] Track your shares with “STOCKMARKET 
s MANAGER” from Portfolio Software 
Facilities include: @ Simple entry of purchases, sales, prices etc. @ Portfolio 
valuation — analysed by investment type-comparison of performance against 
market. @ Calculation of % return on each investment. ¢ Assessment of Capital 
Gains Tax liability. ¢ Handles all investment types, including Traded Options. 


Orders/Cheques to: PORTFOLIO SOFTWARE, PO Box No. 15, London SW11 5RP No. of copies: 


Please send: “STOCKMARKET MANAGER” @ £39.95 incl. p&p L] 
Information sheet (please enclose SAE) C] 


Name...... 


PORTFOLIO SOFTWARE 


CARDFILE MANAGEMENT SYSTEM / WITH MANUAL 
’ AND PSION RTM / £17.50 


A friendly but comprehensive database environment which allows quick retrieval of 
information concerning friends and business acquaintances. 
Each 42 field card covers personal, company and mail addresses as well as general inform- 
ation. All the usual facilities are available plus computer assisted insertion, alteration, mailfile 
generation and printing of whole records and single or selected mail addresses. 30+ options 
are available. 
Please specify mdv/flp+size on order or send an SAE for details. 


Ark Distribution, 62 Manor Way, North Harrow, Middx, HA2 6BY 


COMPUTER CLEANERS 
* & & & STOP LOCK UPS & & & & 
Do you suffer lost data or lock-ups? Do you think the mains is the cause? If so then our sockets may be the 
answer. 
As well as cutting high voltage spikes they smooth the cut spikes and filter RF interference from 1 to 130MHz. 
‘These Computer Cleaners work’ (independent computer user group test) 
Adaptor (1 socket) (5a fuse) — £14 incl. 
Trailing 4-way socket (13a fuse) — £24 incl. 
Simply plug either in — no wiring 


Tony Firshman Services 
43 Rhyl Street, London NW5 3HB 01 267 3887 
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Intelligent error 
messages 


EN MLA: NEM fe IS 


Multitasking clock 
full range of 
QDOS functions 


Pop up calculator and calendar RAM disks and full range of QDOS functions 


ICE makes all of the day to day tedious computer housekeeping (eg. deleting and copying files) you need 
to do simplicity itself. By using pictures (Icons) to represent the functions you want and the files on your disk 7 

or microdrive, all you have to do is point and click, instead of typing reams of mysterious commands. ICE Folders allow action 
is extremely powerful and can take action on many files at the same time, saving you hours each week! ICE on multiple files 
gives you an inbuilt multitasking clock, calendar and calculator for up to the minute efficiency. 


ICE also includes the powerful CHOice tasking software that allows you to run several programs 
simultaneously! 
ICE comes on EPROM cartridge that plugs into the cartridge ROM port 
at the rear of the QL. 


ICE uses next to no user RAM! __ ICE is always available to the user instantly no 

need to load from microdrive or disk | ICE is fully compatible with the Psion™ 

applications and most QL commercial software | ICE is fully compatible with 
Superbasic programs and can be called from Superbasic | ICE is fully compatible 


with microdrives, disk drives and RAM disks | ICE can be used in conjunction with progres ttee 
the cursor keys, a joystick ora mouse — ICEis multitasking! ICE is only £49.95. feane aee CHoles 


mailmerge 


QL JOYSTICKS 


Ideal for ICE or QL Games 


QSPELL 


* Puzzle section allows you to 


...Postcode ........ 


Designed by John Knight Publicity Ltd, London. 
| enclose a cheque/POi/card no. for £ ......... 


Qspell is a proof reader and solve crosswords, anagrams ’ 

spelling checker for QUILL and puzzles £2 Discount i purchcsed with 
way advanced features. eli palieg Mep Uc tlh rogram 

* word dictionary J QL SURESHOT Fully Micro 
including 1000 user words." * Fully Menu Driven with Help switched. Now ony £419.95 

* Create your own dictionary _ files QL QUICKSHOT Ideal for 

x Multitasking Quill Editor.” Amazing Value at £19.95 Games £43.95 


ARCHIVER £48.95 


EIDERSOFT THE OFFICE, HALL FARM, NORTH OCKENDON, UPMINSTER, ESSEX RM414 3QH. 
GL QUIGKSHOT JOYSTICK @£13.95 SGM ssccsseontsnensteeconnsnnnsshitecseslissseonsanent 
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Archiver is a collection of i oe 2e 
business programs for Psion Ps = ef 
ARCHIVE™, 2 2 6 § 
xInvoicing * Stock Control Sats Ss oS 
* Mailing * Appointments Se& 11 156 g 
Archiver lets you use the real power of a S iss SE oa = 
the Archive Database | 4 : = 2 is Sin et 

: € id 
ea eee ey |° 2 2 oa550 3 
Archiver comes with a 48 : 292 oOear 2 2 
page es and technical ; Sk oe Om = @e : o 
manual. Monitor mode only. Bia S HGS i a 3 
Please write ortelephone for *@L ARCHIVE BOOK ZAPPER 68008 Arcade Action |v Zoscn50 dB 
full detail by lan Muarry (356 pages) Zap your way through scores of at oS oe 2 = = 
ES aS Archive made simple! An ideal aliens in this multi-level 400% Hl] o@ntEta2 oO Re 
NOW WITH MAILMERGE companion text to ARCHIVER Only machine code QL arcade game 2 eka E ke ood 
ry ol 
£44.95 from Eidersoft TV/Monitor : | 2 OG < = GOza4 
EIDERSOFT 0708 852647 Telex 8951807 Bese: £10.95 
Trade Enquiries Welcome x NOW EAGLE 
s = DESCENDER STYLE ARCADE 


Psion, Quill and Archive are trademarks of Psion Ltd. 
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Of late the ‘in’ word amongst com- 
puter hacks has been “WIMPS”, 
meaning Windows, Icons, Mice and 
PointerS. It seems that no new per- 
sonal computer will sell without the 
kind of push button computing that 
systems such as Microsoft's GEM, 
Atari’s TOS and Apple’s MAC(DOS) 
afford. Judging by the size of the law- 
suits currently running in the States 
this view would seem to be shared in 
the highest of silicon circles. But 
what of QL user’s? 

Well, those familiar with the QL’s 
elaborate, unwieldy and often convo- 
luted command syntax should wel- 
come any system which circumvents 
it entirely and allows one to carry out 
essential housekeeping operations at 
the press of a button (or two). Eider- 
soft’s Icon Control Environment or 
ICE for short, does exactly 
this. 


Designed as a_ user- 
friendly “front end” for 
QDOS, ICE has much in 
common with WIMPS 


systems found on fully- 
fledged PCs. It cocoons the 
user from the vagaries of 
the operating system 
within a protective 
graphics shell. This takes 
as its theme the idea that a 
parallel can be drawn 
between operating a com- 
puter and running a busy 
office. Switch on your QL 

with the 16K ICE EPROM 
plugged into the ROM 
socket at the back and the screen 
depicts a small workdesk dotted with 
little figures or ‘icons’ which repre- 
sent the various devices that may be 
linked to the QL, various files in stor- 


age and sv uds and ends as a 
calendar -ulator and a wastebin. 
To use LCE all the user need do is 


guide « ittle arrow or ‘pointer’ across 
the screen using the cursor keys, 
joystick or a mouse (which will be 
available shortly). When the pointer 
is in the immediate vicinity of a par- 
ticular icon‘or control option (dis- 
played on a panel at the foot of the 
screen), you simply click the space 
bar once or twice depending on 
whether you wish to select the item 
or initiate any implied operation. 
The process, which requires no typed 
input is child’s play. 

Basic housekeeping operations 
such as extracting directories, copy- 
ing files and running programs are 
carried out implicitly by ICE. The 
user need only ‘point-and-press’ and 
ICE takes care of the rest. Where, for 
example, multiple files need to be 
copied or deleted you point at each 
file in turn and then point at the 
destination device or the bin respec- 
tively. Where operations are irrever- 
sible ICE will require the user to 


confirm his intentions. Where errors’ 


occur messages display written in 
plain English. 


Is Eidersoft’s new icon-based 


software a jewel in the QL’s crown? 


Files on disk (floppy or RAM) and 
microdrive are paged to the screen in 
groups of twelve. ICE automatically 
distinguishes between different file 
types and uses different icons to dis- 
play them. The types that it recog- 
nises are general machine code files, 
EXECutable code, SuperBasic pro- 
grams, Quill documents, Abacus 
spreadsheets, Easel graphs and Arc- 
hive databases plus export, boot and 
tasking files. The obvious benefit 
here is that the user can at a glance 
see what a file contains. Less 
obvious, is that users when running a 
program need not _ distinguish 
between files that are EXECed and 
those which LRUN so, for example, 
boot programs for Psion’s packages 
(version 2.00) are not necessary. 
General housekeeping and system 
operations appear explicitly as 
options on a control panel at the foot 
of the screen. These allow for files to 
be RENAMEd, their contents 
VIEWed and INFOrmation as to 
their full name, length, type and date 
last amended, displayed. Addition- 
ally disks (RAM or floppy) or car- 
tridges may be FORMATted or 
BACKed UP and SYSTEM inform- 
ation relating to available memory, 


jobs running, QDOS and ICE version 
number may be extracted. A further 
option allows the user to CUS- 
TOMise ICE. Here defaults relating 
to date, time, device names, printer 
installation, pointer speeds and key 
sensitivity may all be varied. Last, 
there is an option to leave ICE and 
return to SuperBasic. 

ICE also supplies two special func- 
tions, a calendar and a calculator. 
The former, which displays an entire 
calendar month at a time with the 
current date highlighted in red and 
allows you to quickly scroll back and 
forth through the months, is quite 
useful. The latter, however, which 
mimicks the typical desk top cal- 
culator right down to an imitation 
LED display would seem to be geared 
to reinforcing the illusion of the ‘tidy 
little workdesk’ and is of 
little practical value. 

Along with the ICE 
EPROM Eidersoft also 
supply a microdrive car- 
tridge containing their 
CHOice software. This con- 
sists of an ingenious set of 
programs (including a 
RAM disk driver) which, 
provided you have suffi- 
cient additional memory, 
allows you to multitask up 
to four EXECutable pro- 
grams of your own choosing 
alongside ICE. 

CHOice was tested using 
PCML’s Q+ interface with 
its extra 256K memory and 
built-in RAM disk driver. Having 
reserved 128K for Archive, Abacus 
and Quill we were able to run them 
simultaneously and switch back and 
forth between the packages (as well 
as ICE) simply by pressing 
CTRL+F3. We were impressed not 
only by the speed at which you could 
move between the packages but also 
the fact that when you returned to 
one of them, you did so at exactly the 
same point from which you had left 
earlier, whether in the middle of a 
document, database or spreadsheet. 

Without an elaborate system of 
pull-down windows ICE is very much 
less sophisticated than its upmarket 
counterparts and as such would cer- 
tainly justify the title of a poor man’s 

M. However, far from being a 
criticism this is a compliment. The 
program is after all only 16K long, as’ 
opposed to GEM’s 90K, exacts virtu- 
ally no toll upon the limited memory 
available within an unexpanded QL 
and yet is fun, easy to use and virtu- 
ally idiot proof. Furthermore, com- 
bined with CHOice it opens up-an 
entirely new dimension in practical 
computing on the QL hitherto denied 
most users. Little wonder then that 
ICE unlike many new products has 
found an instant application on the 
various QLs used to run QL User. 


Eidersoft 0708 852647 Ice £49.95 
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Nice Password. 
Shame about the Identity. 


It’s a unique combination. 

Your Special Identity Number 
and Personal Password. The valu- 
able key to huge databases teeming 
with activity, set on our Mainframes 
across the nation. 

On Micronet 800, you’re a 
valued individual, adding your own 
special flavour and personality to 
the database. 

Take our exciting new “Gallery’- 
You control your personal screens 
for all to see. The intriguing “Chatline” 
public conversation service gives 
you freedom to express your views 
and meet some remarkable people. 

All part of a tremendous Com- 
munications section that networks 
you to 60,000 Micronet and Prestel 
users across the country. Try Tele- 
shopping, or interview celebrities 
live on “Celebrity Chatline’’ every 
Wednesday night. 

And there’s FREE (& instant) 
National Electronic Mail, plus Inter- 
national Telex, and the Contact and 
| SwapShop bulletin boards. 


Get computer news first on 


Micronet’s daily (and iia “> 20) 


““Newsflashes” and read up on the 
latest reviews and courses. Feast 
from our regularly changing menu of 
programs to download straight into 
your micro - absolutely free. 

You also get access to Educa- 
tional Computing’s “School Link” 
and Prestel’s huge 300,000 page 
database, including world news, 
business & share bulletins and 
optional homebanking. For only 
£16.50 per quarter, that’s less than 
the price of a daily paper! 

Micronet is unique amongst 
networks and bulletin boards as it 
keeps your phone costs very low with 


ere. 


special local* rate calls whenever 
you connect up — that’s around 40p 
for a whole hours entertainment 
each evening. 

The only accessory you need is 
a Modem, to get the best value for 
money around in micro communi- 
cations. 

Fill in the coupon for the full 
facts and send to Micronet 800, 8 
Herbal Hill, London ECIR5EJ. But 
be warned, Micronet 800 is a ‘living’ 
service with ever-expanding fea- 
tures. So maybe you'd be better to 
call in at your local Micronet 800 
Action Station. There are thousands 
of Micronetters waiting to meet you ! 


London ECIR 5EJ. Telephone 01-278 3143. 
Please send me the full facts about Micronet 800. 


Name _ 


Make/Model of Micro 


Address 


* For 98% of telephone users. 
Prestel is a trademark of British Telecommunications plc. 
On Prestel 


__ Each month, for a trial period, this column will contain details of readers’ 

___ programs that we are able to offer on microdrive. 

____ In return for a small administration charge (per program — including a 
__ royalty for the author), we will copy onto blank microdrives any or all of the 
_ featured programs. 

Each program will be a direct copy of the published listing, or an extended 

version of that listing where the program in question was too long to print in 

full (programs for which an abridged version has been published are marked 

with an asterisk). 

It must be stressed that we are not selling the software itself, nor providing 

any guarantee that it performs any particular function (though we do check 

every program that is to appear in QL User), we are merely offering a service 

to readers who wish to obtain QL User programs on drive rather than by 

typing them in straight from the page. 


HOW TO ORDER 


Listed below are programs which have appeared as listings inside QL User. 

To the right of each program entry is a small box, which you should mark 
with a bold cross if you want to order that program. 

Once you have put a cross next to all the programs you wish to have copied 
onto microdrive, simply complete the rest of the order form and send it along 
with your PO/cheque AND BLANK FORMATTED DRIVE to: 

QL User, MICRODRIVE EXCHANGE, Priory Court, 

30-32 Farringdon Lane, EC1R-3AU. . 

If you wish us to supply the drive, please add an extra £2.50 for every drive 
required and mark the order form appropriately. 

Please allow 28 days for delivery. 


ORDER FORM 


Author Language Program Name Price Issue Size 
Giles Todd (B) DIY Assembler £5.00 Jun/Mar 120 () 
Converts Assembler source into m/c object code 
Richard Cross (AO) Mini Monitor £3.00 Oct 600 
I Pocket sized monitor with comprehensive facilities 
A Didcock (B) Connect4 £1.00 Sept 150) 
] Pit your wits against the QL 
Shergold & Tose (B) * Golf £2.00 May 350 
: From fairway to green on 59 different courses of varying difficulty 
Williams & Holliday a {A0) Paladin £5.00 Apr 70 
: The basis of our games programming series — a space invaders type game written entirely machine 
code 
Richard Cross (MB) Sprite Animation £2.00 Apr 50 
A subtle blend of machine code and SuperBasic that Produces a versatile sprite designer and high 
Speed animator 
] Steve Deary (B) Pacman £1.00 Mar 20 1) 
] A reasonably fast rendition of the famous arcade favourite 
| Andy Carmicheal (B) Family Tree £3.00 Aug 1000 
Archive program and database for setting up and displaying large family trees 
I James Lucy (B) Composer £3.00 Oct 
Compose and play sheet music on the a 
Mathew Capp (B) Miners £2.00 Aug 300) 
| A nail biting management simulation that puts you in charge of the NCB 


| PJ Smith (B) * DIY Adventure £1.00 Feb 60 
| A skeleton framework where you simply have to slot in the details to create your bespoke adventure 


R Green (B) Qthello £1.00 Aug 25 
A 3D version of the well known board. game Othello for one or two players 
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SJ Ackers (B) “Touch Type £4.00 Aug 800 
Touch typing course ~ 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


B = SuperBasic, AO — Assembler + Object Code (ready to run), MB = Machine Code + 
Basic loader 
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Noofprogramsordered .......... Totalcost £........... i 
Total sectors : | 
(max200perdrive) ............ I 
Noofdrivessent =  ............ I 
Noofdrivesrequired |... @ £250each £.... H 
Plus postage & packing £ 0.75 I 

Subtotal £........ | 

Subscribers reduction *(if applicable) @ —10% £... I 

Add VAT@ 15% £.... 


TOTAL TO BE SENT 


I 
Please copy onto microdrive the programs above which | have indicated with I 
a cross. | enclose a cheque/PO tothe valueof£ (made payable to I 
QL User). | understand that QL User only undertakes to SUPPLY these 
programs (copied onto microdrive) and accepts no liability for their I 
operation as defined by the author. Neither can QL User supply additional I 
information about any of the listings other than that originally printed in the 
magazine (any article reprints required must be ordered and paid for I 
separately at £1 each inclusive of post and packing). 

*Subscribers to QL User may deduct 10% off the Sub Total on their orders. U 
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Compilation of QL product suppliers and 
manufacturers (beginning with hardware). 


A>Line Computer 


Systems 

0533 778724 

4-way mains filter/adapter 
Action Computer 
Supplies 

01 903 3921 

Mains spike eliminator 
Anglo Services Ltd 
0705 671421 

QL Eprom Programmer 
Broomspring 
Specialities 

0742 737000 

Table-top stands 
Cambridge 
Microelectronics Ltd 
0223 314814 

Q-PROM Eprom Programmer 
Cambridge Systems 
Technology 

0223 323302 

Care Electronics 
0923 777155 


Philips and other monochrome 
monitors 


Citadel Products Ltd 
01 951 1848 

Classified Product & 
Services 

0930 52204 

Leads etc. 

Commpak Data 

0792 473697 

Computer Supplies 

146 Church Road, Boston, 


Lines 
Joysticks 


Compware 

0270 582301 

CST 

0438 352150 

Data Distributors Ltd 
0990 28921 

Kaga, Sinclair Vision 
Datasystems 


01 4821711 
Star 


Eidersoft 


0808 852647 
Quicksoft II Joystick and 
accessories 


Eprom Services 

0532 667183 

Tony Firshman Services 
01 267 3887 

Mains Spike Filter 

4 Systems 

68 Foxwood Close, 


Feltham, Middx 
Cartridges & box 


Management Science 
Ltd 


17 West Hill, London SW18 
QL case 


Medic DataSystems 
0256 460748 
MicroPeripherals 
0256 473232 
Microvitec PLC 
0274 390011 
Microworld 


0293 545630/0273 6711863 
Kaga, Epson, Smith Corona, 
Microvitec, Philips, Vision 


Miracle Systems Ltd 
0272 603871 

Modem House 

0392 69295 

Opus Supplies Ltd 


Redhill 65080 
JVC 


PCML Ltd 


0372 67282/68631 
QL+ RAM cards 


Power International 
0705 756715 

Mains spike eliminator 
Printerland 


0484 514105/687875 
Epson, Brother, Kaga, Canon, Juki 


Q-Links 
0436 6660 


Cables & accessories 
Quest 

04215 66488 

Sigma Research 
231 Coldhams Lane, 
Cambridge 

Silicon Express 
0533 374917 
Sinclair Research 
0276 685311 

Slave Software 

050 846 8866 

Q-Disc 

SMC Supplies 

01 441 1282 

Joystick adaptor, Centronics & 
Epson Serial 
Spectrotek 

0669 20565 

QL repair service 
Strong Computer 
Systems 

0267 231246 

Brother, Shinwa, Epson, Kaga, 
Mannesman Tally, Canon, 
Daisystep, Smith Corona, 
Microvitec, Philips 
Tandata 


06845 68421 
(OEL) 
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Technology Research 
Ltd 

0784 63547 
Technomatic Ltd 

01 208 1177 

Microvitec, Kaga, Epson, Juki, 
Brother 

Transform Ltd 

089 283 4783 


QL dust cover, microdrive storage 
box, RS232 lead 


Twickenham Computer 
Centre 

01 891 4991 

Kaga, Ensign, Canon 

Viglen Computers 
Supplies 

01 843 9903 

Voltmace Ltd 

Park Drive, Baldock, Herts 


Printer stand 


Accountancy 


Software 


Sinclair Research 
QL Cash Trader 


Adder 

0223 277050 
Q-Doctor, Assembler 
Bedsoft 

30 Lansdown Road, 


Bedford, Beds 
Gambler, Beat the Clock, Screen 
Editor 


Blain Software 
8 Berkeley Close, Staines, 
Middx 


Merry Muncher, Fire Tower, 
Advance Invaders 


Brainstorm 

4 Lindsey Close, 
Cramlington 

Westminster Palace 
Champagne Computers 
Amsterdam 020 149130 
QL boek, DR Q Leap 

Co-op Soft Ltd 


0272 22223 
Civil/Structural Engineering 


Compugem Ltd 
01 731 7948 
Master Blaster 


Computer One 


0223 862616 
Pascal, Forth, Assembler, Typing 
Tutor, Monitor 


CP Software 

10 Alexandra Road, 
Harrogate 

Bridge Player 

DA Bandoo 

81 Mount Pleasant, 
Wembley 


Assembler, Screen Editor 


Data Management 
0904 760351 

SBUTIL, Mbackup, Terminal, 
Chargen, SBextras, FM 
DataGEN 

0989 67469 


Packages for Solicitors, 
Accountants, Video Libraries, 
Double Glazing Sales & 
Miscellaneous Credit Control. 
Digital Precision 

01 527 5493 

QL Super Sprite Generator, Games 
Designer, Monitor + 
Dissassembler, QL Super 
Backgammon 

Eidersoft 


0708 852647 
QL Art, Zapper, QSPell, Archiver, 
QL Art 


English Software 


061 835 1358 
QL Hyperdrive 


Equate 

2 Ffordd Denwyn, 
Penyffordd, Chester 
Solar Invaders, Wall Breaker, 
Draughts, Mind Your Path, 
Statistical Averages, Calendar 
Flite Software Ltd 

01 353 7423023 

Equate (maths package) 

GST Computer Systems 
0954 81991 

QL Assembler, 68K/OS, QC C 
Compiler, Macro Assembler 
Harcourt 


Sinclair Research 
QL Touch ‘n’ Go 


Hisoft 

0582 696421 

MonQL 

Intersoft 

7 Richmond Road, Exeter, 
Devon 

Executive Adventure 

J&D Software 

3 Alfred Road, Lowton, 
Warrington 
Metacomco 


0272 428781 
Assembler, BCPL, Lisp 


Micro Processor 
Engineering Ltd 

21 Hanley Road, 
Southwater, Horsham, E 


Sussex 
QL Terminator Emulator 


MicroAPL 
01 622 0395 
Microdeal 


0726 68020 
Havoc, Frogger, Cuthbert 


Micrologic Consultants 
Ltd 

57 Station Road 

MPC Software 

0602 820106 

Most popular games 

New Horizon Software 
Fourwinds, 30 Cwm Lane, 


Rogerstone, Gwent 
Pacman, QBERT, Gold + others 


Paddy Software 
0726 832718 


Educational Programs 
PCS 

8 Oak Grove Way, 
Bridgwater, Somerset 
PCS Utilities 

Peak Electronics 

32 Clifton Avenue, 


Hartlepool, Cleveland 
QL Colour Quest 


Portfolio Software 
PO Box No 15, London 
SWll 

Positron Computing 
0554 759624 

Hi-res screen dump 
Printerland 

0484 513105/687875 
Psion Chess, Metacomco 
Assembler 

Psientific Software 
0482 649187 

Keydefine 

Psion 

01 723 9408/0553 
Quill, Abacus, Easel, Archive, 
Psion Chess 


QCode 
42 Swinburne Road, 


Abingdon, Oxon 
Terminal Emulation, 68000 
Assembler/Editor 


QJump 
Sinclair Research 
QL Monitor, QL Toolkit 


QSoft 
01 499 7417 
Agenda 
Quest 
04215 66488 


Business Accounts 


Rodent Software 
3 Brookend Drive, Henley- 
in-Arden, W Midlands 


S&B Software 
20 St Nicholas Street, Diss, 
Norfolk 


Fantasia Adventure 
Saltgrade Software 
31 Royal Terrace, 
Edinburgh EH7 

File Manager, File Editor 
Shadowsoft 


0296 669740 
Area Radar Controller, Strategy 


Sigma Research 
231 Coldhams Lane, 
Cambridge 

Sketchpad 

Sinclair Research 


0276 685311 
Psion Chess 


Slave Software 

050 846 8866 

Arable Farmer Software 
Snowsoft 

6 Bousefield Crescent, 


Newton Aycliffe, Durham 
Hungry Harry in the Haunted 
House, Doom Room: Exod. VIII 


Strong Computer 
Systems 

0267 231246 
Summit Software 
36 Wood Crescent, 
Rogerstone, Newport, 


Gwent 

Frogger, Dungeon 

Super Plant Software 
097 423 223 

Plant & gardening software 
Swansoft 

164 Vicarage Road, 


Morriston, Swansea 
Space Trek 

Talent Computer 
Systems 

041 552 2128 

SKUL, WEST, GraphicQL 
TDI Software Ltd 


0272 742796 

USCD Pascal, USCD Fortran 77, 
Advanced Development Toolkit, 
USCD P-system, USCD Prolog 


TR Computer Systems 


093 924 621 

QL Payroll 

Triptych 

Sinclair Research 

QL Decision Maker, QL 
Entrepreneur, QL Project Planner 
Tropic Software 

09274 27497 

Bongolia Escape 

WD Software 

0534 81392 

Hilltop, St Marys, Jersey 
WD Morse Tutor 

Xpert Software 

0460 42023 


Business software 


BOOKS 


Adder 

0223 277050 
Century 

01 434 4241 
Collins 

01 493 7070 
Duckworth 

01 485 3484 

Ellis Horwood Ltd 
0284 789942 
Granada 

01 493 7070 
Harper & Row 

01 836 4635 
Hutchinson 

01 387 2811 
Interface 

9-11 Kensington High 
Street, W8 
McGraw Hill 

0628 23431 
Melbourne House 
01 940 6064 
MicroPress 

0892 39606 
Prentice Hall 
0442 58531 
Sunshine 

01 437 4343 
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CLASSIFIED 


QL EPROM PROGRAMMER 


* SINGLE BOARD PLUGS INTO QL EXPANSION SOCKET 
x NO EXTERNAL POWER SUPPLY NECESSARY 

%* EPROMS SELECTED AUTOMATICALLY BY SOFTWARE 
* 4K/8K EPROM SOCKET FOR USER EXPANSION 


* USER FRIENDLY SOFTWARE SUPPLIED ON MICRODRIVE 

* FULL DOCUMENTATION SUPPLIED 

%* EPROMS PROGRAMMED 2716/2732/2732A/ 2764/ 27128/ 
27256/2516/27016/27032/27C64/ 27C128/270256 


kkk kkk £87.50+£2.50 pip kkk 


Cheques made payable to: 


ANGLO SERVICES LTD, 4/6 LONDON ROAD, PORTSMOUTH PO2 0OLH 


ALLOW UP TO 28 DAYS DELIVERY 


MPC SOFTWARE 


£11.50 = Meteor Storm 
MatchPoint. .... £13.50 = Hyperdrive . 
Cuthbert in Space .. £13.50 
Lands of Havoc .. £18.00 
Crazy Painter . £11.50 
£16.00 
£16.00 
£11.50 = Startrek . 
£35.00 BCPL. 
£78.00 
Super Monitor £15.00 Super Sprite Gen. 
Super Forth .... £25.00 Super Astrologer 
Cartridge Doctor . £13.50 = Graphiq| 
Cash Trader ... £65.00 Home Finance ... 
Supercharge B mopiler . £52.00 = Microvitec Colour = 
Cumana 3” Disc Drive + IF £180.00 _— Silicon Express 3” Disc + IF 
Cumana IF and Dual Drives £270.00 —_—Parallel Printer Interface 
Blank Microdrive Cartridges £1.80 Joystick Adaptor 
QL Advanced User Guide £14.50 = QL and Software .... 
Plus all the latest software and hardware. 


Super Arcadia 


All prices include VAT. Postage on orders over £5 is free. Add 50p to orders under £5. 
Even cheaper rates for overseas customers. Write for details. 


MPC SOFTWARE oept. atu1, 72 Julian Rd, West Bridgford, Nottm. NG2 5AN. 


OFFICE WORK MADE EASY!! 


SONY Portable Dictaphone + footswitch ................ £55.00 
For use with your wordprocessor (+ £2.00 p&p) 


For details on our range of peripheral equipment please write or telephone us on 


0342 28740 


(Mail order only) Please send cheque or Postal Order to: 
SOFTWARE MARKETING 


111 Lingfield Road, East Grinstead, West Sussex, 
RH19 2EL %* VAT not payable 


PRACTICAL SOFTWARE 


Programs Pack 1 — Invoice and labels printers, Metric 
conversions, simple to use sort and search database, various 
financial (interest, loans, etc). Many programs — supplied on 
microdrive cartridge or disc. Please state type. £11.99 
inclusive, deduct £1.99 if you supply the disc or cartridge. 


DILWYN JONES, 4 THE CRESCENT, 
BANGOR, GWYNEDD, LL57 2AA 
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BREAKTHROUGH SOFTWARE 
GREAT INNOVATIONS FOR THE QL AT SENSIBLE PRICES 
REAL WINDOWS!!! £6.50 inc cartridge & p&p 
Each Real Window is stored off screen. It can be swapped with the part of the screen it overwrites, altered and 
then swapped back again. Several windows can be overlapped and ‘shuffled’ onscreen. Makes professional 
Pull Down menus, possible as the screen is restored to its original state when the window is put away! Text 
and graphics are both handled! Real Windows are controlled from basic using only three commands (all 
machine code):- 
BREAKTHROUGH ON-LINE SUPERBASIC MANUAL £8.50 inc cartridge/p&p 

Press the F1 key and the screen you are working on (text, listing, graphics including multiple windows) is saved 
instantly! Enter a Superbasic Keyword and everything you want to know is displayed on screen. Flip between 
screens to check syntax etc. Contains ALL Superbasic commands and much more. Create your own help files 
with Quill. Includes instant recall of the last line typed (F5) for edit and re-entry. Essential for all new users of 
the QL. 


RECALL £6.50 inc cartridge & p&p 

Get back the last line that you typed at the touch of a key (as in archive), edit your errors and re-enter the line. 
Works from Basic or within any software. Save yourself the frustration of retyping long lines just because you 
typed a hyphen instead of an underline! How many times do you do that?! 

* *& FREE & %& FREE * * FREE x % FREE PROGRAMS * * FREE x * FREE * * FREE & * 
* > © %& 8 M/C BASIC COMMANDS + SCREEN DUMP FREE WITH ALL PURCHASES * * > & 
GETN & GETS Allow you to edit variables on screen. MCUR Moves the cursor up down left or right. TAB Moves 
the cursor to the given column no (left or right). FONT Allows you to reset the font address. Makes user designed 
graphics possible. RMODE returns the current display mode. DUMP dumps 1 or more lines from the screen to 
the printer. BVAR returns address of Basic Variables. PLUS HI RES SCREEN DUMP to printer at the touch of a 
key. 


17 SHAFTESBURY WAY, ROYSTON, HERTS, SG8 9DE (0763) 45482 


JOYSTICKS FOR QL 


Plugs straight into control port 1 or 2. 
NEEDS NO INTERFACE OR ADAPTOR — £7.99 each or £15 for two. 
Add 50p p&p. 

Two joysticks plus CONCENTRATION (an addictive 1-4 player game) on 
microdrive cartridge for only £23.95 inclusive. Game only: £10.95 inclusive. 
Send to: COMPUTER SUPPLIES 
146 Church Road, Boston, Lincs. PE21 0JX. 


Ideal Xmas present for all QL 
GARDENERS 


Choose plants for your garden, house, or office with 
either our popular QL SHRUB DATA BANK and 
PLANNER (£11.95 inc.) or the Q. HOUSE PLANT 
DATA BANK and PLANNER (£11.95 inc.) 


Each planner comes on 2 microdrive cartridges in a neat blue plastic 


microdrive storage box with a 12 cartridge capacity 
(extra boxes only 80p each) 


MONEY REFUNDED IF YOU AGREE WITH THE NOVEMBER 
REVIEW OF THE Superplant Software IN THE QL USER, 
PAGES 50 TO 51!!!! 


For same day despatch, send cheques, credit card nos. to 


Superpliant Software, Llangeitho, Tregaron, 
Dyfed, Wales, SY25 6QG or Tel: 097 423 223 


A QL FLOPPY & 


@ isk SYSTEM 


* SPECIAL XMAS PRICES — 


CALL HOTLINE (0234) 219814 < 
x SEE US AT THE ZX MICROFAIR 


QL FLOPPY DISK SYSTEM 


— MICRODRIVE EMULATION 

— FULL COMPATIBILITY WITH ALL SINCLAIR HARDWARE 
AND SOFTWARE 

— 3''/2 PANASONIC DISK DRIVE 720K FORMATTED 
CAPACITY WITH PSU 

— COMPACT SIZE 


TWIN EXPANSION UNIT 
— LOW PROFILE - DOES NOT INTERFERE WITH QL 
KEYBOARD 


— CAN BE CONNECTED TO THRU-CON RAM CARD 
— ELEGANT QL MATCHING CASE 


THRU - CON RAM CARD 


— DUPLICATE QL INTERNAL CONNECTOR ON CARD 
— 256K OR 512K MEMORY 

— FAST ACCESS D-RAMS (150ns) 

— IDEAL FOR USE WITH ANY FLOPPY DISK INTERFACE 


DARK PRINTER 


— 120 cps BIDIRECTIONAL 

— FULLY EPSON COMPATIBLE 

— TRACTOR AND FRICTION FEED 
— QL INTERFACING INCLUDED 


OF SINCLAIR RESEARCH Lid 


CL ARE REGISTERED TRADE MARKS 


Ah 


NOW ON — 
GENERAL RELEASE 


-Psion’s Powerful in-house 
Belek development 
_ package for your QL 


ONLY £14.95 


_ Utilise the full graphics power of Become a pone designer with 
the QL in either high or low Q DRAW - design simple or 
resolution with Q. DRAW, used to extremely intricate screens. 
create the stunning detailed Create original electronic works 
images as seen in CHESS and of art. Add personal touches to 
| MAICH POINT screens saved from other 
programs such as QL EASEL. 


